Distance on a great circle

Time bar (total: 55.9s)

analyze1.2s (2.2%)

Memory
41.6MiB live, 1 336.1MiB allocated
Algorithm
1×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.2s (16.4%)

Memory
-22.7MiB live, 9 321.5MiB allocated
Samples
7.5s7 396×1valid
192.0ms860×0valid
Precisions
Click to see histograms. Total time spent on operations: 7.2s
ival-cos: 2.4s (34.1% of total)
ival-sin: 2.1s (29.1% of total)
ival-mult: 722.0ms (10.1% of total)
adjust: 538.0ms (7.5% of total)
ival-atan2: 308.0ms (4.3% of total)
ival-sqrt: 275.0ms (3.8% of total)
ival-sub: 266.0ms (3.7% of total)
ival-div: 223.0ms (3.1% of total)
ival-pow2: 189.0ms (2.6% of total)
ival-add: 87.0ms (1.2% of total)
exact: 11.0ms (0.2% of total)
ival-true: 7.0ms (0.1% of total)
ival-assert: 3.0ms (0% of total)
Bogosity

preprocess849.0ms (1.5%)

Memory
-280.3MiB live, 623.1MiB allocated
Algorithm
1×egg-herbie
Rules
13 332×lower-fma.f64
13 332×lower-fma.f32
4 598×lower-+.f32
4 596×lower-+.f64
3 256×lower--.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02331311
15441304
213531304
335321280
461861272
02665
04565
17465
213265
327365
452365
587365
6134565
7163765
8216765
9294965
10412065
11438665
12452765
13458765
14461165
15478065
16522165
17531065
18531065
19531865
20637165
0856163
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
Symmetry

(negabs R)

explain924.0ms (1.7%)

Memory
-8.7MiB live, 1 084.0MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
72122(2.4884588833741593e+237 9.315344830004786e+167 -4.954168958659554e+34 -3.663897497154095e+284 2.633863493845085e-105)0-(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
62119(7.414057323402561e+218 5.807242270456373e-157 1.9951471172238133e+78 -6.952061520121296e+239 -4.486998556166046e-51)0-(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
103(1.8463825322907084e-261 1.0266818301806511e-44 -2.6805507892224927e-227 -1.4022573622382507e+258 1.5300785364141224e-69)2(2.0419394334617064e-95 -2.878959218681588e+43 -4.8945081347602335e+146 1.5043383409851738e+127 -1.1915099139082917e+126)(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
20-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))))))
10-1(2.566409722691469e+303 1.4466314566104886e+69 1.6016469797374399e-245 2.7017397715278745e+283 -5.61237087389642e-226)(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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-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)))sensitivity1940
sin.f64(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))sensitivity1810
-.f64(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))cancellation1110
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-rescue20
↳(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))underflow22
↳(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))underflow14
↳(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))underflow2
Confusion
Predicted +Predicted -
+1160
-12713
Precision
0.4773662551440329
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+11600
-127013
Precision?
0.4773662551440329
Recall?
1.0
Freqs
test
numberfreq
013
1102
2137
34
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
532.0ms464×1valid
10.0ms48×0valid
Compiler

Compiled 924 to 108 computations (88.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 487.0ms
ival-cos: 256.0ms (52.6% of total)
ival-sin: 103.0ms (21.2% of total)
ival-mult: 33.0ms (6.8% of total)
adjust: 23.0ms (4.7% of total)
ival-sub: 17.0ms (3.5% of total)
ival-sqrt: 14.0ms (2.9% of total)
ival-div: 13.0ms (2.7% of total)
ival-atan2: 12.0ms (2.5% of total)
ival-pow2: 10.0ms (2.1% of total)
ival-add: 4.0ms (0.8% of total)
ival-true: 1.0ms (0.2% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)

eval0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶63.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
Compiler

Compiled 70 to 26 computations (62.9% saved)

simplify536.0ms (1%)

Memory
-3.7MiB live, 588.9MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
✓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-diff128
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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-diff384
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
✓cost-diff384
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
Rules
13 332×lower-fma.f64
13 332×lower-fma.f32
4 598×lower-+.f32
4 596×lower-+.f64
3 256×lower--.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
026390
045390
174390
2132390
3273390
4523390
5873390
61345390
71637390
82167390
92949390
104120390
114386390
124527390
134587390
144611390
154780390
165221390
175310390
185310390
195318390
206371390
08561380
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(-.f64 phi1 phi2)
phi1
phi2
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
#s(literal 1 binary64)
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #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 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/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 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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 1/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)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(literal 1 binary64)

localize354.0ms (0.6%)

Memory
23.2MiB live, 529.8MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
✓accuracy99.1%
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy98.7%
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy79.5%
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓accuracy75.8%
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
Samples
289.0ms232×1valid
5.0ms24×0valid
Compiler

Compiled 392 to 28 computations (92.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 269.0ms
ival-mult: 105.0ms (39% of total)
ival-cos: 62.0ms (23% of total)
ival-sin: 56.0ms (20.8% of total)
adjust: 12.0ms (4.5% of total)
ival-sub: 7.0ms (2.6% of total)
ival-sqrt: 7.0ms (2.6% of total)
ival-atan2: 7.0ms (2.6% of total)
ival-div: 6.0ms (2.2% of total)
ival-pow2: 5.0ms (1.9% 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)

series78.0ms (0.1%)

Memory
5.7MiB live, 135.7MiB allocated
Counts
8 → 300
Calls
Call 1
Inputs
#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())
#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
Outputs
#s(alt (* -1/2 phi2) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))) (taylor -inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))) (taylor -inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))) (taylor -inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))))))) (taylor -inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))) (taylor -inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))) (taylor -inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))) (taylor -inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))))))) (taylor -inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor -inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 phi2)) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2)))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2))))))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1))))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
Calls

75 calls:

TimeVariablePointExpression
10.0ms
lambda2
@inf
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))
4.0ms
phi1
@inf
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))
2.0ms
lambda1
@inf
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))
2.0ms
phi2
@0
(sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))
2.0ms
phi1
@-inf
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))

simplify429.0ms (0.8%)

Memory
-23.4MiB live, 648.5MiB allocated
Algorithm
1×egg-herbie
Rules
9 312×lower-fma.f64
9 312×lower-fma.f32
7 506×lower-*.f64
7 506×lower-*.f32
2 514×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
052010244
1168110020
257669998
081179552
Stop Event
1×iter limit
1×node limit
Counts
300 → 300
Calls
Call 1
Inputs
(* -1/2 phi2)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* -1/2 phi2)
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* -1/2 phi2)
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1/2 lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(* 1/2 lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* 1/2 lambda1)
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* 1/2 lambda1)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(* -1/2 lambda2)
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* -1/2 lambda2)
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
Outputs
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)) (neg.f64 phi1))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)) (neg.f64 phi1))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)) (neg.f64 phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64)) (neg.f64 phi2))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64)) (neg.f64 phi2))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64)) (neg.f64 phi2))
(* -1/2 lambda2)
(*.f64 #s(literal -1/2 binary64) lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64)) (neg.f64 lambda1))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(* -1/2 lambda2)
(*.f64 #s(literal -1/2 binary64) lambda2)
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* -1/2 lambda2)
(*.f64 #s(literal -1/2 binary64) lambda2)
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (neg.f64 lambda2))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))
(+ (* 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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* 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 phi1 (fma.f64 phi1 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* 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 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (*.f64 #s(literal -1/6 binary64) phi1) (*.f64 #s(literal 1/4 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)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal 1/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/6 binary64))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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 #s(literal -1/2 binary64) (-.f64 phi2 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 (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1/6 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (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))) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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 #s(literal -1/2 binary64) (-.f64 phi2 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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (cos.f64 phi2) (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 #s(literal -1/2 binary64) (-.f64 phi2 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 (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1))) #s(literal 1/6 binary64)) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (cos.f64 phi2) (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(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 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/8 binary64)))) (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 phi1 (fma.f64 phi1 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/48 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal 1/48 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(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 lambda1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 #s(literal -1/8 binary64)))) (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 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 lambda1 #s(literal -1/48 binary64)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #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 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal 1/48 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(- 1 (+ (* (cos phi2) (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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (neg.f64 (fma.f64 phi1 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (fma.f64 phi1 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 phi1 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 1/6 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64))))) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 lambda2 lambda1))) #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 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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 (fma.f64 (fma.f64 #s(literal 1/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (neg.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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 (fma.f64 phi2 (-.f64 (*.f64 phi2 (*.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))) (fma.f64 #s(literal 1/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))
(- 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (neg.f64 (fma.f64 (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (-.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 phi1))) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 1/6 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 phi1))))) (-.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 lambda2 (fma.f64 (*.f64 (neg.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1)))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1))) #s(literal -1/6 binary64))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1)))) (-.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.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))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (fma.f64 phi1 (fma.f64 (*.f64 #s(literal -1/4 binary64) (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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (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 phi1 (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (+.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64))))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.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/4 binary64) (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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/6 binary64))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.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 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 #s(literal -1/2 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 (fma.f64 (*.f64 phi2 #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 lambda2 lambda1))) #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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/6 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sqrt.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 lambda1 (*.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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (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))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (sqrt.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 lambda1 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal -1/6 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (sqrt.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi1)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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)))) (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))) (sqrt.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 lambda2 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi1)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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)))) (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (cos.f64 phi1)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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)))) (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (/.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1))) #s(literal 1/6 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 phi1)))))) (sqrt.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))

rewrite345.0ms (0.6%)

Memory
25.9MiB live, 487.6MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
5 830×lower-*.f32
5 820×lower-*.f64
5 266×lower-/.f32
5 262×lower-/.f64
2 482×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
026174
045174
1149149
2997145
08852142
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
8 → 273
Calls
Call 1
Inputs
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
Outputs
(+.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(-.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (/.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 #s(literal 2 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 #s(literal 2 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))))
(-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))
(-.f64 (/.f64 (*.f64 phi1 #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) phi2) #s(literal 4 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))))))
(-.f64 (/.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))) (fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 phi1 #s(literal 1/2 binary64) (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))
(/.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal -2 binary64))
(/.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 1/8 binary64)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))) (fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 phi2 #s(literal 1/2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (+.f64 phi1 phi2))
(/.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))
(/.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 phi2))) #s(literal -4 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (neg.f64 phi2))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 phi1) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) phi2)) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 phi1) (/.f64 #s(literal 2 binary64) phi2)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) phi2)))
(/.f64 (-.f64 (*.f64 (neg.f64 phi1) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 phi2))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2))) #s(literal -4 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 1/8 binary64)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))))) (neg.f64 (fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (neg.f64 (+.f64 phi1 phi2)))
(/.f64 (fma.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 1/8 binary64) (pow.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)) #s(literal -1 binary64)))
(*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))
(*.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (-.f64 phi1 phi2) (+.f64 phi1 phi2)))
(*.f64 (/.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) #s(literal 2 binary64)) (/.f64 (-.f64 phi1 phi2) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
(-.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))) #s(literal 2 binary64)) (/.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 #s(literal 2 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 2 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (*.f64 #s(literal 2 binary64) (+.f64 lambda1 lambda2))) (/.f64 (*.f64 lambda2 lambda2) (*.f64 #s(literal 2 binary64) (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (*.f64 lambda1 #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) lambda2) #s(literal 4 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))))))
(-.f64 (/.f64 (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64))) (fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64))) (fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))
(fma.f64 lambda1 #s(literal 1/2 binary64) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal -2 binary64))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 2 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 2 binary64) (+.f64 lambda1 lambda2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 4 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) #s(literal 1/8 binary64)) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64))) (*.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))) (fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (neg.f64 lambda1) (neg.f64 lambda2)) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 lambda2))) #s(literal -4 binary64))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2)))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (neg.f64 lambda2))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 lambda1) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) lambda2)) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 lambda1) (/.f64 #s(literal 2 binary64) lambda2)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) lambda2)))
(/.f64 (-.f64 (*.f64 (neg.f64 lambda1) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (neg.f64 lambda2))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) lambda2))) #s(literal -4 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) #s(literal 1/8 binary64)) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64))) (*.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64))))) (neg.f64 (fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) #s(literal 1/8 binary64) (pow.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (/.f64 (+.f64 lambda1 lambda2) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))
(fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (*.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 12 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 8 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 12 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 18 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 12 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(*.f64 #s(literal 2 binary64) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))) R)
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))) #s(literal 2 binary64))
(+.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))
(+.f64 (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(-.f64 (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(-.f64 (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 1/2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 4 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) #s(literal 1 binary64)) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) #s(literal 1/2 binary64)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))))) (sqrt.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))))) (sqrt.f64 (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))))) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))

eval275.0ms (0.5%)

Memory
10.1MiB live, 366.9MiB allocated
Compiler

Compiled 87 573 to 4 874 computations (94.4% saved)

prune479.0ms (0.9%)

Memory
-7.8MiB live, 866.2MiB allocated
Pruning

88 alts after pruning (88 fresh and 0 done)

PrunedKeptTotal
New1 035881 123
Fresh000
Picked101
Done000
Total1 036881 124
Accuracy
66.3%
Counts
1 124 → 88
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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))))))))))
60.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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))))))))))
61.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
60.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
53.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.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)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
▶62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
49.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.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 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
63.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 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) (/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))))))
▶64.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
32.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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))))))))))
64.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
49.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 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
54.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 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
55.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
56.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
37.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 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
18.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 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
48.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
50.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2))))))))))
43.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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)))))))))))
40.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)))) #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)))))))))))
40.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)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
57.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 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
21.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
34.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
16.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
52.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 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))))))))))
38.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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))))))))))
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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
48.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
50.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
49.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
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 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal 1/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
42.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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
40.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (cos.f64 phi2) (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
39.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 phi2 (fma.f64 (fma.f64 #s(literal 1/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (neg.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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
41.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 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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
42.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
48.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))))) (-.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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
49.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))))))
35.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 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
18.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
45.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 #s(approx (/ (- lambda1 lambda2) 2) (*.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))))))))))
48.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
45.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 (*.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)) (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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
16.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
▶44.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.2%
(*.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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 #s(approx (sin (/ (- phi1 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))))))))))
47.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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))))))))))
46.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (cos.f64 phi2) (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (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)))) (-.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
41.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))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (fma.f64 phi1 (fma.f64 (*.f64 #s(literal -1/4 binary64) (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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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))))) (fma.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 15 200 to 6 664 computations (56.2% saved)

simplify393.0ms (0.7%)

Memory
66.7MiB live, 713.9MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓cost-diff128
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
✓cost-diff384
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
✓cost-diff384
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
✓cost-diff768
(*.f64 (*.f64 (*.f64 (cos.f64 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-diff384
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
✓cost-diff384
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
✓cost-diff768
(*.f64 (*.f64 (*.f64 (cos.f64 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-diff6464
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
✓cost-diff128
(+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
✓cost-diff384
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
✓cost-diff384
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
✓cost-diff768
(*.f64 (*.f64 (*.f64 (cos.f64 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-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
✓cost-diff192
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
✓cost-diff128
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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-diff384
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
✓cost-diff384
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
✓cost-diff768
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
Rules
15 792×lower-fma.f32
15 786×lower-fma.f64
4 540×lower-*.f32
4 472×lower-*.f64
2 216×lower--.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01152736
02092708
13442658
26462602
315512387
445262375
080372312
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(-.f64 phi1 phi2)
phi1
phi2
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 phi1 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 phi2 #s(literal 1/2 binary64))
(*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(-.f64 phi1 phi2)
(sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(*.f64 #s(literal 2 binary64) R)
R
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))
(sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)))
#s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) phi1)
#s(literal 1/2 binary64)
phi1
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
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 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
R
(*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
#s(literal 2 binary64)
(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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
#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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
#s(literal -1/2 binary64)
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
phi1
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) phi1)
#s(literal 1/2 binary64)
(*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
phi2
(*.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))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 phi2)
(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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))
(*.f64 lambda1 #s(literal 1/2 binary64))
lambda1
#s(literal 1/2 binary64)
(cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))
(*.f64 lambda2 #s(literal 1/2 binary64))
lambda2
(*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))
(sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 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)))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(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 1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/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)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #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) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/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)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 phi1 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 phi2 #s(literal -1/2 binary64))
(*.f64 phi2 #s(literal 1/2 binary64))
(*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))
(cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))) (*.f64 R #s(literal 2 binary64)))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(atan2.f64 (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(-.f64 lambda1 lambda2)
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 phi1 phi2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 phi1 phi2)
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(-.f64 phi1 phi2)
(sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) R)
(*.f64 R #s(literal 2 binary64))
R
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64))
(pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)))
(sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))
#s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))
#s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) phi1)
(*.f64 phi1 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
phi1
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #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) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
phi2
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(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 1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(-.f64 phi1 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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
#s(literal 2 binary64)
(atan2.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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(sqrt.f64 #s(approx (+ (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))))
#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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
phi1
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) phi1)
(*.f64 phi1 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 phi2 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
phi2
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos.f64 (*.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(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 1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(-.f64 phi1 phi2)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi2)
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda1 #s(literal -1/2 binary64))))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 R #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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda1 #s(literal -1/2 binary64))))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (cos.f64 phi1) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda1 #s(literal -1/2 binary64))))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (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 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda1 #s(literal -1/2 binary64))))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda1 #s(literal -1/2 binary64))))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(-.f64 phi1 phi2)
phi1
phi2
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda1 #s(literal -1/2 binary64))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(neg.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda1 #s(literal -1/2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))
(*.f64 lambda1 #s(literal 1/2 binary64))
lambda1
#s(literal 1/2 binary64)
(cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))
(*.f64 lambda2 #s(literal 1/2 binary64))
lambda2
(*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))
(sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #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) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))

localize1.4s (2.6%)

Memory
-56.3MiB live, 1 766.2MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓accuracy99.1%
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy98.7%
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy79.5%
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓accuracy75.8%
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓accuracy79.5%
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
✓accuracy79.5%
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓accuracy75.8%
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓accuracy52.0%
#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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
✓accuracy79.5%
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓accuracy75.8%
(sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)))
✓accuracy75.8%
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓accuracy51.1%
#s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))
✓accuracy84.8%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
✓accuracy79.3%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
✓accuracy79.2%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
✓accuracy75.5%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
✓accuracy99.1%
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy98.7%
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy79.5%
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓accuracy75.8%
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
Samples
984.0ms246×1valid
19.0ms8×2valid
2.0ms2×0valid
Compiler

Compiled 2 570 to 96 computations (96.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 872.0ms
ival-cos: 246.0ms (28.2% of total)
ival-sin: 238.0ms (27.3% of total)
ival-pow2: 134.0ms (15.4% of total)
ival-mult: 112.0ms (12.8% of total)
adjust: 51.0ms (5.8% of total)
ival-atan2: 24.0ms (2.8% of total)
ival-sub: 23.0ms (2.6% of total)
ival-sqrt: 20.0ms (2.3% of total)
ival-add: 16.0ms (1.8% of total)
ival-div: 7.0ms (0.8% of total)
exact: 1.0ms (0.1% of total)
ival-neg: 1.0ms (0.1% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series241.0ms (0.4%)

Memory
31.6MiB live, 183.9MiB allocated
Counts
24 → 840
Calls
Call 1
Inputs
#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())
#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())
#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())
#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())
#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())
#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
Outputs
#s(alt (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (neg phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (* -1/4 (cos (neg phi2))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (* -1/4 (cos phi1)) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (patch (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* phi1 phi2)) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (- (* phi1 (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))) (* 1/2 phi2))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (- (* phi1 (+ 1/4 (+ (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (* 1/12 (* phi1 phi2))))) (* 1/2 phi2))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 phi2)) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2)))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2))))))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1))))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg phi2)) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (sin phi1))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor 0 phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor inf phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor -inf phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor 0 phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor inf phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor -inf phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) (patch #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 phi2)) (taylor 0 phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2))))) (taylor 0 phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2)))))) (taylor 0 phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2))))))))) (taylor 0 phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1))))) (taylor 0 phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1))))))) (taylor 0 phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1))))))))) (taylor 0 phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) (patch (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)) (taylor 0 phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (- lambda2 lambda1))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (- lambda2 lambda1))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (patch (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (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/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 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))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (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 (+ (* 1/2 (* (* 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)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 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)))))) (sqrt (/ 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/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 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))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (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 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 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)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 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/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)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 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))))))) (* 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) (* (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)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 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))))))) (+ (* (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)))))) (sqrt (/ 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))))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (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/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 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))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (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/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 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/2 (* (* 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/4 (/ (* (pow (cos (* 1/2 phi1)) 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)))))) (sqrt (/ 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))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (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/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 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)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 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/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/4 (/ (* (pow (cos (* 1/2 phi1)) 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/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) (* (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/4 (/ (* (pow (cos (* 1/2 phi1)) 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))))))) (+ (* (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)))))) (sqrt (/ 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))))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* 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)))))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* 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))))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) 2))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) 2))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* 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))))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (- (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) 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)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (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))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
Calls

210 calls:

TimeVariablePointExpression
27.0ms
lambda1
@inf
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))
20.0ms
lambda2
@0
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2))))
15.0ms
lambda2
@-inf
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2))))
8.0ms
phi1
@0
(- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))))
3.0ms
phi1
@inf
(+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2))))

simplify540.0ms (1%)

Memory
6.3MiB live, 839.5MiB allocated
Algorithm
1×egg-herbie
Rules
9 414×lower-fma.f64
9 414×lower-fma.f32
6 750×lower-+.f64
6 750×lower-+.f32
6 672×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0118824748
1397823952
0841122889
Stop Event
1×iter limit
1×node limit
Counts
840 → 834
Calls
Call 1
Inputs
(* (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))))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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))))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 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))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(* -1/2 phi2)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* -1/2 phi2)
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* -1/2 phi2)
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1/2 lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(* 1/2 lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* 1/2 lambda1)
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* 1/2 lambda1)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(* -1/2 lambda2)
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* -1/2 lambda2)
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 phi2)
(- phi1 phi2)
(- phi1 phi2)
(- phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
phi1
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(* -1 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(- (+ 1/2 (* 1/2 (cos (neg phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (* -1/4 (cos (neg phi2))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (* -1/4 (cos phi1)) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- 1/2 (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos lambda1)))
(- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1)))
(- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(- (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 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))) (* 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))) (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* 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)) (* 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)) (* 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)) (* 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)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* 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))) (* 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))) (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* 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)) (* 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)) (* 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)) (* 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)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(pow (sin (* -1/2 (- lambda2 lambda1))) 2)
(+ (* -1/2 (* phi1 phi2)) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* phi1 (- (* phi1 (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))) (* 1/2 phi2))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(+ (* phi1 (- (* phi1 (+ 1/4 (+ (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (* 1/12 (* phi1 phi2))))) (* 1/2 phi2))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 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)))
(+ (* -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)))
(+ (* -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)))
(* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* phi2 (- (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* phi2 (- (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* phi2 (- (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 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)) 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 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) (* (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) (* (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) (* (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) (* (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) (* (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) (* (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) (* (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) (* (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 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) (* (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) (* (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) (* (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) (* (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 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 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 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))
(+ (* -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)))
(+ (* (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) (* (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) (* (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) (* (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) (* (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) (* (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) (* (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) (* (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))) (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) (* (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) (* (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) (* (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) (* (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) (* (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 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 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 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 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 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 (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(cos (neg phi2))
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(- 1/2 (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(* -1/2 phi2)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* -1/2 phi2)
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* -1/2 phi2)
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* -1/2 (- lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* -1/2 (- lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt (+ (* (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)))
(+ (sqrt (+ (* (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/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 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)))))))
(+ (sqrt (+ (* (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 (+ (* 1/2 (* (* 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)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 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)))))) (sqrt (/ 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/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 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)))))))))
(+ (sqrt (+ (* (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 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 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)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 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/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)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 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))))))) (* 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) (* (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)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 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))))))) (+ (* (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)))))) (sqrt (/ 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)))))))))))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(+ (sqrt (+ (* (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/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 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)))))))
(+ (sqrt (+ (* (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/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 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/2 (* (* 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/4 (/ (* (pow (cos (* 1/2 phi1)) 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)))))) (sqrt (/ 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)))))))))
(+ (sqrt (+ (* (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/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 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)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 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/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/4 (/ (* (pow (cos (* 1/2 phi1)) 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/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) (* (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/4 (/ (* (pow (cos (* 1/2 phi1)) 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))))))) (+ (* (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)))))) (sqrt (/ 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)))))))))))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* 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)))))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* 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))))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) 2))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) 2))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* 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))))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (- (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) 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)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
(sqrt (+ (* (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)))
Outputs
(* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(+ (* -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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(+ (* (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 phi1 phi1) (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(+ (* (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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 phi1 phi1) (fma.f64 (*.f64 (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 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)))))
(+ (* (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 (*.f64 phi2 phi2) (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 phi1)) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #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))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #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)))
(* (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)))
(* (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)))
(* (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)))
(* (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (neg.f64 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 (* (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 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.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 (+ (* 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 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.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))))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)) (neg.f64 phi1))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)) (neg.f64 phi1))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)) (neg.f64 phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(neg.f64 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(neg.f64 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(neg.f64 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64))))
(* -1/2 lambda2)
(*.f64 lambda2 #s(literal -1/2 binary64))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(neg.f64 (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64))))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(neg.f64 (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64))))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(neg.f64 (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64))))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(* -1/2 lambda2)
(*.f64 lambda2 #s(literal -1/2 binary64))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* -1/2 lambda2)
(*.f64 lambda2 #s(literal -1/2 binary64))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (neg.f64 lambda2))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* phi1 (+ (* 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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* phi1 (+ (* 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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (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) (fma.f64 phi1 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(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 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(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 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(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 phi2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (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 phi1)) (fma.f64 phi2 (*.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(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 (* -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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(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 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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 (* -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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(neg.f64 (fma.f64 lambda1 (/.f64 lambda2 lambda1) (neg.f64 lambda1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(neg.f64 (fma.f64 lambda1 (/.f64 lambda2 lambda1) (neg.f64 lambda1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(neg.f64 (fma.f64 lambda1 (/.f64 lambda2 lambda1) (neg.f64 lambda1)))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(neg.f64 (fma.f64 lambda2 (/.f64 lambda1 (neg.f64 lambda2)) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(neg.f64 (fma.f64 lambda2 (/.f64 lambda1 (neg.f64 lambda2)) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(neg.f64 (fma.f64 lambda2 (/.f64 lambda1 (neg.f64 lambda2)) lambda2))
(* -1 phi2)
(neg.f64 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
phi1
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(- (+ 1/2 (* 1/2 (cos (neg phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (* -1/4 (cos (neg phi2))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(-.f64 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 phi2) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)))) (fma.f64 (cos.f64 phi2) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(-.f64 (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (cos.f64 phi2) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 phi1 (sin.f64 phi2))) #s(literal 1/12 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)))) (fma.f64 (cos.f64 phi2) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (* -1/4 (cos phi1)) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(-.f64 (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 phi1) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(-.f64 (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/12 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 phi1) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal 1/12 binary64) (*.f64 lambda1 (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/12 binary64) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1))) (*.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(- 1/2 (* 1/2 (cos (neg lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))
(- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 lambda1 (sin.f64 lambda2))) (cos.f64 lambda2))))
(- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))
(- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda1) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(- 1/2 (* 1/2 (cos lambda1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))
(- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1)))
(+.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))
(- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))))
(- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda2) (sin.f64 lambda1) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* phi1 (+ (* 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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* phi1 (+ (* 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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (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) (fma.f64 phi1 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(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 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(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 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(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 phi2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (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 phi1)) (fma.f64 phi2 (*.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(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 (* -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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(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 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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 (* -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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(- (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda2 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda1 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(pow (sin (* -1/2 (- lambda2 lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(+ (* -1/2 (* phi1 phi2)) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))
(+ (* phi1 (- (* phi1 (+ 1/4 (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)))) (* 1/2 phi2))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 phi2 #s(literal -1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))
(+ (* phi1 (- (* phi1 (+ 1/4 (+ (* -1/2 (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (* 1/12 (* phi1 phi2))))) (* 1/2 phi2))) (pow (sin (* -1/2 (- lambda2 lambda1))) 2))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/12 binary64) (*.f64 phi2 phi1) #s(literal 1/4 binary64))) (*.f64 phi2 #s(literal -1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -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 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -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 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))
(* phi2 (- (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 phi2 (fma.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) phi2) (-.f64 (/.f64 (pow.f64 (sin.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 (- (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 phi2 (fma.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) phi2) (-.f64 (/.f64 (pow.f64 (sin.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 (- (+ (/ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 phi2 (fma.f64 (cos.f64 phi1) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) phi2) (-.f64 (/.f64 (pow.f64 (sin.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))))))
(* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(*.f64 (neg.f64 phi2) (+.f64 (/.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (neg.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(*.f64 (neg.f64 phi2) (+.f64 (/.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (neg.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (sin (* -1/2 (- lambda2 lambda1))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(*.f64 (neg.f64 phi2) (+.f64 (/.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (neg.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) 2))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (* (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 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #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 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #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 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (fma.f64 phi1 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/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 phi2))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* 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)))
(+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (* 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)))
(+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (fma.f64 phi2 (*.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (* (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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(-.f64 (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 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))
(+ (* -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 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (-.f64 (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 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))
(+ (* -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 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))) (-.f64 (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 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))
(+ (* -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 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) #s(literal -1/12 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) #s(literal 1/12 binary64)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))) (-.f64 (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 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))
(+ (* (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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (* (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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal -1/8 binary64) (*.f64 (*.f64 #s(literal -1/48 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (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 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.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 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(fma.f64 phi1 (fma.f64 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 phi1) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(fma.f64 phi1 (fma.f64 phi1 (neg.f64 (fma.f64 phi1 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (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 #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))))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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))))
(- (+ 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 phi2 (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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 phi2 (fma.f64 phi2 (neg.f64 (fma.f64 phi2 (*.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)) (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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 (fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda1 (neg.f64 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (neg.f64 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda2 (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (neg.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(fma.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (fma.f64 phi1 (+.f64 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* -1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 phi1 (fma.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (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 (- 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))))
(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))))
(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))))
(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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (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 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (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 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(sqrt.f64 (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 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 phi2 (*.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 phi2 (-.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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (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 (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 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/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 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 phi2 (fma.f64 phi2 (*.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 (-.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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (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 (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 phi2 (fma.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) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (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 (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 (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 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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) (* (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))))
(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))))
(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))))
(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))))
(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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (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 (- 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(sqrt.f64 (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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(fma.f64 lambda1 (*.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 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))))) (fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (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 (- 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))))
(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))))
(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))))
(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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(fma.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (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 (- 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))))
(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))))
(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))))
(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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (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 (+ 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(cos (neg phi2))
(cos.f64 phi2)
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (cos.f64 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (sin.f64 lambda2)) (cos.f64 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(- 1/2 (* 1/2 (cos (neg phi2))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (cos.f64 phi2))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(fma.f64 phi1 (fma.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 phi2) phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal -1/12 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(+.f64 (fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 phi1) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(fma.f64 phi2 (fma.f64 #s(literal 1/4 binary64) (*.f64 phi2 (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal 1/12 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)) (neg.f64 phi1))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)) (neg.f64 phi1))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)) (neg.f64 phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(neg.f64 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(neg.f64 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(neg.f64 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64))))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* phi1 (+ (* 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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* phi1 (+ (* 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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (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) (fma.f64 phi1 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(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 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(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 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(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 phi2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (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 phi1)) (fma.f64 phi2 (*.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(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 (* -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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(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 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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)))
(+ (* (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)))
(+ (* (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)))
(+ (* (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 #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(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 (* -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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 lambda2 #s(literal -1/2 binary64)) (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 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.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 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal -1/8 binary64) (*.f64 (*.f64 #s(literal -1/48 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (- lambda2 lambda1)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (fma.f64 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 phi1) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (fma.f64 phi1 (neg.f64 (fma.f64 phi1 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #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))))
(- 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #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))))
(- 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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)))
(-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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))))
(- (+ 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 phi2 (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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 phi2 (fma.f64 phi2 (neg.f64 (fma.f64 phi2 (*.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)) (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 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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) (* (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #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))))
(- 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #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))))
(- 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 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 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -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 (fma.f64 (neg.f64 (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 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 lambda1 (neg.f64 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 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 (* 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 lambda1 (fma.f64 lambda1 (neg.f64 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 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 (- 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #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))))
(- 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #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))))
(- 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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (- (* -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 lambda2 (fma.f64 (neg.f64 (*.f64 lambda2 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(- (+ 1 (* lambda2 (- (* 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 lambda2 (fma.f64 lambda2 (neg.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(- 1 (+ (* (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #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))))
(- 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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #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))))
(- 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 #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 (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 #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 (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 #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 (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 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (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/2 (* (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 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)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (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 (+ (* 1/2 (* (* 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)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 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)))))) (sqrt (/ 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/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 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)))))))))
(fma.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (fma.f64 phi1 (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (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 (+ (* 1/2 (* (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 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)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 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/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)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 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))))))) (* 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) (* (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)))) (* 1/4 (/ (* (pow (cos (* -1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 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))))))) (+ (* (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)))))) (sqrt (/ 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)))))))))))
(fma.f64 phi1 (fma.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 phi1 (fma.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (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/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 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)))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (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/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 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/2 (* (* 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/4 (/ (* (pow (cos (* 1/2 phi1)) 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)))))) (sqrt (/ 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)))))))))
(fma.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (+.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (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/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 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)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 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/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/4 (/ (* (pow (cos (* 1/2 phi1)) 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/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) (* (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/4 (/ (* (pow (cos (* 1/2 phi1)) 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))))))) (+ (* (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)))))) (sqrt (/ 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)))))))))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (+.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 phi2 (fma.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) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))
(+ (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* 1/2 (* (* 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)))))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))))) (sqrt.f64 (-.f64 (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 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))))
(+ (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* 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))))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) 2))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(fma.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))) (fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))))) (sqrt.f64 (-.f64 (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 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))))
(+ (sqrt (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) 2))) (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* 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))))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) (- (* (cos phi1) (* (cos phi2) (+ (* 1/4 (* (cos (* -1/2 lambda2)) (cos (* 1/2 lambda2)))) (* 1/4 (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2))))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (+ (* -1/2 (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda2)))) (* 1/2 (* (cos (* 1/2 lambda2)) (sin (* -1/2 lambda2))))) 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)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (sin (* -1/2 lambda2)) (sin (* 1/2 lambda2)))))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))))) (*.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) #s(literal -1/12 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) #s(literal 1/12 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal 1/4 binary64) (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) #s(literal 2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))))))) (-.f64 (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 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))))))) (sqrt.f64 (-.f64 (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 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))
(fma.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))))))))))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(sqrt (+ (* (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)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))

rewrite433.0ms (0.8%)

Memory
31.4MiB live, 935.1MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
3 864×lower-*.f32
3 820×lower-*.f64
3 430×lower-fma.f32
3 426×lower-fma.f64
3 048×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
092484
0164446
1542371
24090369
09249363
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
24 → 924
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))))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (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 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
#s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))
(sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1)))
#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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
Outputs
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2))
(+.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64)))
(+.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))
(-.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))
(-.f64 (fma.f64 phi1 #s(literal 1/2 binary64) #s(literal 0 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))
(fma.f64 phi2 #s(literal -1/2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 phi2 #s(literal -1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 phi2) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) phi2 (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) #s(literal -1 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 phi2) #s(literal 1/2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))
(/.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal -2 binary64))
(/.f64 (*.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1 binary64))))
(/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))
(/.f64 (-.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 4 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 phi1 phi2))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal -1/8 binary64))) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 #s(literal 1/8 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 phi1 phi2))) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 phi1 phi2))
(/.f64 (*.f64 (*.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))))
(/.f64 (*.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (+.f64 phi1 phi2))
(/.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2))) #s(literal -4 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal -1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 #s(literal 1/8 binary64) (*.f64 phi2 (*.f64 phi2 phi2))))) (neg.f64 (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 phi1 phi2)))) (neg.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)))) (neg.f64 (+.f64 phi1 phi2)))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (neg.f64 (+.f64 phi1 phi2)))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2)))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) lambda2))
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))
(-.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))
(fma.f64 lambda1 #s(literal 1/2 binary64) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) lambda2))
(fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(fma.f64 #s(literal 1/2 binary64) lambda1 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(neg.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal -2 binary64))
(/.f64 (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 2 binary64) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 2 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64))) (*.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (neg.f64 lambda1) (neg.f64 lambda2)) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) lambda2))) #s(literal -4 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64))) (*.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64))))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (neg.f64 (+.f64 lambda1 lambda2)))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal -2 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 lambda1 lambda2))) #s(literal -2 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) #s(literal 2 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 #s(literal -2 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))
(/.f64 (*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(*.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(*.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) #s(literal -1 binary64))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 6 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))))))) (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(+.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))))
(-.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))) (/.f64 (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))
(fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 phi2 (neg.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (cos.f64 phi1)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (cos.f64 phi1) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2)))
(fma.f64 (neg.f64 phi2) (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 #s(literal -1 binary64) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2)))
(fma.f64 (*.f64 phi2 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) phi2 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (neg.f64 (*.f64 phi2 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (*.f64 (neg.f64 phi2) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (-.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64))) (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (-.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64))) (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64) (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))
(-.f64 (*.f64 (sin.f64 (fma.f64 phi1 #s(literal 1/2 binary64) #s(literal 0 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 phi1 #s(literal 1/2 binary64) #s(literal 0 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))))
(/.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))
(/.f64 (exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))))) (exp.f64 (log.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))))))
(/.f64 (exp.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))) (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))) (neg.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))) (neg.f64 (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))
(pow.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(+.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(fma.f64 (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (neg.f64 (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (neg.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (*.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (+.f64 (sin.f64 (-.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (neg.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (sqrt.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (neg.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(*.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(cos.f64 (fma.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(cos.f64 (fma.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 2 binary64))
(/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64))) (neg.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))) (neg.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 2 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))))
(pow.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) #s(literal 1 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
#s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))
(exp.f64 (log.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))
(sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))
(pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))) (sqrt.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 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)))) (-.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 lambda1)))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 lambda1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))))
(exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 lambda1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 lambda1)))))
(fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))))
(pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (sqrt.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (sqrt.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (neg.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(*.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))

eval1.2s (2.2%)

Memory
-0.1MiB live, 2 147.4MiB allocated
Compiler

Compiled 432 561 to 18 211 computations (95.8% saved)

prune2.3s (4.1%)

Memory
-44.9MiB live, 3 319.7MiB allocated
Pruning

190 alts after pruning (190 fresh and 0 done)

PrunedKeptTotal
New5 0301715 201
Fresh641983
Picked505
Done000
Total5 0991905 289
Accuracy
82.3%
Counts
5 289 → 190
Alt Table
Click to see full alt table
StatusAccuracyProgram
62.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
59.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
59.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
61.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
▶45.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
54.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
60.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
60.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
▶58.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
54.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
59.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
37.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
39.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
46.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
37.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
49.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
36.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
38.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
44.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
38.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
45.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
48.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
39.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
46.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
▶45.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
41.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
39.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
43.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
42.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
48.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
46.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
44.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
47.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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))))))))))
61.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
60.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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))))))))))
50.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
▶80.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
80.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.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)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
80.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
53.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
54.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)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.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)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (fma.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (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))))))))))
53.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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))))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
53.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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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))))))))))
63.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
63.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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
63.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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
62.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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
50.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
47.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
52.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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)))))))))
36.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
51.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
50.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 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 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)))))))))
48.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
40.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
42.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
18.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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
45.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.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))))))))))
49.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 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 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) (/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))))
63.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
37.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
19.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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
52.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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)))))))))
52.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
49.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 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
54.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 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
55.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
21.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
16.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
50.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) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
49.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
51.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 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
48.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))))) (-.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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
18.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 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
49.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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
46.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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #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))))))))))
55.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)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
55.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
37.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
56.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
16.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
16.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
53.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
42.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 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))))))))))
44.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
44.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
44.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
45.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
26.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
14.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
36.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
33.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
30.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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)))))))))
33.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
42.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
27.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
19.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
19.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
36.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 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 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)))))))))
13.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
32.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
31.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
35.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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))))))))))
48.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
38.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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))))))))))
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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
49.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
▶43.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
43.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)))) (-.f64 (fma.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
24.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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))
43.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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
38.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (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))))))))))
38.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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))))))))))
39.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
32.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)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
39.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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)))))))))
32.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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
25.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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
42.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))))) (fma.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 32 438 to 15 902 computations (51% saved)

simplify473.0ms (0.8%)

Memory
0.3MiB live, 637.6MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓cost-diff128
(*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))
✓cost-diff384
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
✓cost-diff384
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
✓cost-diff6464
(-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
✓cost-diff320
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
✓cost-diff320
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
✓cost-diff320
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
✓cost-diff320
(*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
✓cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
✓cost-diff256
(-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
✓cost-diff128
(neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
✓cost-diff128
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
✓cost-diff128
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
✓cost-diff384
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
Rules
16 764×lower-fma.f32
16 744×lower-fma.f64
3 642×lower-+.f32
3 630×lower-+.f64
3 572×lower-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01583384
02903278
15122844
211272832
332022827
479532827
080062747
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(*.f64 phi2 #s(literal -1/2 binary64))
phi2
#s(literal -1/2 binary64)
(cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 phi1 #s(literal 1/2 binary64))
phi1
#s(literal 1/2 binary64)
(*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 phi2 #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(-.f64 phi1 phi2)
(sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
#s(literal -1/2 binary64)
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) R)
R
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))
#s(literal 1/4 binary64)
(*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(-.f64 phi1 phi2)
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
#s(literal -1/2 binary64)
(neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(*.f64 #s(literal 2 binary64) R)
R
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(-.f64 phi1 phi2)
(sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
#s(literal 1/4 binary64)
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))
(neg.f64 (cos.f64 phi1))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 2 binary64) R)
R
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
R
(*.f64 #s(literal 2 binary64) (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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
#s(literal 2 binary64)
(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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
#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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))))
(sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(*.f64 lambda2 #s(literal -1/2 binary64))
lambda2
#s(literal -1/2 binary64)
(cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))
(*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))
(neg.f64 lambda1)
lambda1
(*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))))
(cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))
(cos.f64 phi1)
phi1
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) phi1)
#s(literal 1/2 binary64)
(*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
phi2
(*.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))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 R #s(literal 2 binary64)))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(*.f64 phi2 #s(literal -1/2 binary64))
phi2
#s(literal -1/2 binary64)
(cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 phi1 #s(literal 1/2 binary64))
phi1
#s(literal 1/2 binary64)
(*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 phi2 #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 phi2 #s(literal -1/2 binary64))
(*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64)))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(-.f64 lambda1 lambda2)
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 phi1 phi2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 phi1 phi2)
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))
(-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
#s(literal -1/2 binary64)
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) R)
(*.f64 R #s(literal 2 binary64))
R
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (-.f64 phi1 phi2))))) #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/4 binary64) #s(literal 3/4 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (-.f64 phi1 phi2))))) #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/4 binary64) #s(literal 3/4 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (-.f64 phi1 phi2))))) #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/4 binary64) #s(literal 3/4 binary64)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (-.f64 phi1 phi2))))) #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/4 binary64) #s(literal 3/4 binary64))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(-.f64 lambda1 lambda2)
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (-.f64 phi1 phi2))))) #s(literal -1 binary64) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/4 binary64) #s(literal 3/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/4 binary64) #s(literal -1/4 binary64)))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1/8 binary64) #s(literal 1/8 binary64))
#s(literal 1/4 binary64)
(*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(-.f64 phi1 phi2)
(-.f64 phi1 phi2)
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(cos.f64 (-.f64 phi1 phi2))
#s(literal -1/2 binary64)
(neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64))
(sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 phi1 phi2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 phi1 phi2)
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) R)
(*.f64 R #s(literal 2 binary64))
R
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(-.f64 lambda1 lambda2)
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 phi1 phi2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 phi1 phi2)
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
#s(literal 1/4 binary64)
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(cos.f64 (-.f64 phi1 phi2))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(-.f64 phi1 phi2)
#s(literal 1 binary64)
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))
(*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))
(neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(neg.f64 (cos.f64 phi1))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(-.f64 lambda1 lambda2)
#s(literal -1/2 binary64)
(-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) R)
(*.f64 R #s(literal 2 binary64))
R
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (*.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 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
R
(*.f64 #s(literal 2 binary64) (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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))
#s(literal 2 binary64)
(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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))
(atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))
(sqrt.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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))))
#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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))))
(-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))
(fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))
(sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))
(*.f64 lambda2 #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) lambda2)
lambda2
#s(literal -1/2 binary64)
(cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) lambda1)
(neg.f64 lambda1)
lambda1
(*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))))
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))
(sin.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(cos.f64 phi1)
phi1
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) phi1)
(*.f64 phi1 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 phi2 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
phi2
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos.f64 (*.f64 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 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
#s(literal 1 binary64)
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi2)
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)

localize1.9s (3.5%)

Memory
11.9MiB live, 2 249.1MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓accuracy98.7%
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy79.5%
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓accuracy75.8%
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓accuracy52.0%
#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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
✓accuracy79.2%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
✓accuracy79.2%
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
✓accuracy75.5%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
✓accuracy75.5%
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
✓accuracy79.2%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
✓accuracy75.5%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
✓accuracy75.5%
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
✓accuracy75.5%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))
✓accuracy79.2%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
✓accuracy79.2%
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
✓accuracy75.5%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
✓accuracy58.5%
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
✓accuracy99.4%
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
✓accuracy99.1%
(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy98.7%
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy79.5%
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Samples
1.1s220×1valid
210.0ms33×2valid
4.0ms3×0valid
Compiler

Compiled 3 185 to 139 computations (95.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-cos: 472.0ms (44% of total)
ival-sin: 170.0ms (15.9% of total)
ival-mult: 156.0ms (14.6% of total)
adjust: 98.0ms (9.1% of total)
ival-add: 39.0ms (3.6% of total)
ival-atan2: 32.0ms (3% of total)
ival-sub: 29.0ms (2.7% of total)
ival-sqrt: 28.0ms (2.6% of total)
ival-pow2: 27.0ms (2.5% of total)
ival-div: 16.0ms (1.5% of total)
ival-neg: 6.0ms (0.6% of total)
exact: 1.0ms (0.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series179.0ms (0.3%)

Memory
2.7MiB live, 166.8MiB allocated
Counts
27 → 816
Calls
Call 1
Inputs
#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())
#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())
#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
Outputs
#s(alt (* -1/2 lambda2) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (+ (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)) (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor 0 phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor 0 phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor 0 phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor 0 phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor inf phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor inf phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor inf phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor inf phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor -inf phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor -inf phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor -inf phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor -inf phi2) (#s(alt (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (patch (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg lambda2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (- (* -1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2))))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos lambda1)) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (- (* -1/4 (* lambda2 (cos lambda1))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1)))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2))))) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* phi1 (sin (* -2 phi2)))) (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2))))) (* phi1 (+ (* -1/4 (sin (* -2 phi2))) (* -1/4 (* phi1 (cos (* -2 phi2))))))) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2))))) (* phi1 (+ (* -1/4 (sin (* -2 phi2))) (* phi1 (+ (* -1/4 (cos (* -2 phi2))) (* 1/6 (* phi1 (sin (* -2 phi2))))))))) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2)))))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (* phi2 (sin (* 2 phi1)))) (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1)))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* phi2 (+ (* -1/4 (* phi2 (cos (* 2 phi1)))) (* 1/4 (sin (* 2 phi1)))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* phi2 (+ (* 1/4 (sin (* 2 phi1))) (* phi2 (+ (* -1/4 (cos (* 2 phi1))) (* -1/6 (* phi2 (sin (* 2 phi1))))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2)))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (patch (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor -inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor 0 phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (* (cos phi1) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor 0 lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf lambda1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* phi1 phi2)) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (- (* phi1 (+ 1/4 (* -1/2 (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)))) (* 1/2 phi2))) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (- (* phi1 (+ 1/4 (+ (* -1/2 (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (* 1/12 (* phi1 phi2))))) (* 1/2 phi2))) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (taylor 0 phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi1) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (+ (/ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (+ (/ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (+ (/ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (taylor -inf phi2) (#s(alt (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (patch (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) (patch (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 1/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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* -1/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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (pow (sin (neg (* 1/2 phi2))) 2) (taylor 0 phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (pow (sin (neg (* 1/2 phi2))) 2)) (taylor 0 phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (pow (sin (neg (* 1/2 phi2))) 2)) (taylor 0 phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (+ (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)) (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (pow (sin (neg (* 1/2 phi2))) 2)) (taylor 0 phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor inf phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor inf phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor inf phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor inf phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor -inf phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor -inf phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor -inf phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor -inf phi1) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (sin (* 1/2 phi1)) 2) (taylor 0 phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor inf phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor inf phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor inf phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2) (taylor inf phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2) (taylor -inf phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2) (taylor -inf phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2) (taylor -inf phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2) (taylor -inf phi2) (#s(alt (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (patch (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (neg phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (* -1/4 (cos (neg phi2))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (* -1/4 (cos phi1)) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg phi2)) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (sin phi1))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* 1/2 (* lambda1 (sin (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/2 (sin (neg lambda2))) (* lambda1 (+ (* -1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* lambda2 (cos lambda1))))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (+ (* 1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 phi2)) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 phi2)) (* -2 (* phi1 (sin (* -2 phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 phi2)) (* phi1 (- (* -2 (* phi1 (cos (* -2 phi2)))) (* 2 (sin (* -2 phi2)))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* -2 phi2)) (* phi1 (- (* phi1 (+ (* -2 (cos (* -2 phi2))) (* 4/3 (* phi1 (sin (* -2 phi2)))))) (* 2 (sin (* -2 phi2)))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 phi1)) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* 2 phi1)) (* 2 (* phi2 (sin (* 2 phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* 2 phi1)) (* phi2 (- (* -2 (* phi2 (cos (* 2 phi1)))) (* -2 (sin (* 2 phi1)))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (* 2 phi1)) (* phi2 (- (* phi2 (+ (* -2 (cos (* 2 phi1))) (* -4/3 (* phi2 (sin (* 2 phi1)))))) (* -2 (sin (* 2 phi1)))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg phi2)) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (sin phi1))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* 1/2 (* lambda1 (sin (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/2 (sin (neg lambda2))) (* lambda1 (+ (* -1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* lambda2 (cos lambda1))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (+ (* 1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)) (taylor 0 phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)) (taylor -inf phi1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)) (taylor -inf phi2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda1) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor 0 lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor inf lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)) (taylor -inf lambda2) (#s(alt #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (patch #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 phi2)) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2)))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2))))))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1))))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
Calls

204 calls:

TimeVariablePointExpression
39.0ms
lambda1
@0
(sqrt (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))
15.0ms
lambda1
@inf
(+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))
2.0ms
lambda1
@inf
(- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1)))))
2.0ms
phi1
@inf
(- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1)))))
2.0ms
phi1
@inf
(+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))

simplify605.0ms (1.1%)

Memory
4.8MiB live, 507.3MiB allocated
Algorithm
1×egg-herbie
Rules
8 668×lower-fma.f64
8 668×lower-fma.f32
6 392×lower-+.f64
6 392×lower-+.f32
5 462×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0111520571
1378820077
0802018877
Stop Event
1×iter limit
1×node limit
Counts
816 → 804
Calls
Call 1
Inputs
(* -1/2 lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(* 1/2 lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* 1/2 lambda1)
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* 1/2 lambda1)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(* -1/2 lambda2)
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* -1/2 lambda2)
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))
(+ (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (+ (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)) (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))
(+ (* (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 (+ (* (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 (+ (* (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 (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1/2 phi2)
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 phi2)
(- phi1 phi2)
(- phi1 phi2)
(- phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
phi1
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(* -1 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* 1/2 (cos (neg lambda2)))
(- (* -1/2 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2))))
(- (* lambda1 (- (* -1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2))))
(- (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2))))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2))))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(* 1/2 (cos lambda1))
(- (* 1/2 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1)))
(- (* lambda2 (- (* -1/4 (* lambda2 (cos lambda1))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1)))
(- (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1)))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(- 1/2 (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos lambda1)))
(- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1)))
(- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2)))))
(+ (* -1/4 (* phi1 (sin (* -2 phi2)))) (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2))))))
(+ (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2))))) (* phi1 (+ (* -1/4 (sin (* -2 phi2))) (* -1/4 (* phi1 (cos (* -2 phi2)))))))
(+ (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2))))) (* phi1 (+ (* -1/4 (sin (* -2 phi2))) (* phi1 (+ (* -1/4 (cos (* -2 phi2))) (* 1/6 (* phi1 (sin (* -2 phi2)))))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1)))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1)))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1)))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1)))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(+ (* 1/4 (* phi2 (sin (* 2 phi1)))) (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* phi2 (+ (* -1/4 (* phi2 (cos (* 2 phi1)))) (* 1/4 (sin (* 2 phi1))))))
(+ (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* phi2 (+ (* 1/4 (sin (* 2 phi1))) (* phi2 (+ (* -1/4 (cos (* 2 phi1))) (* -1/6 (* phi2 (sin (* 2 phi1)))))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2)))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2)))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2)))))))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2)))))))
(* -1 phi2)
(- phi1 phi2)
(- phi1 phi2)
(- phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
phi1
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(* -1 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(- (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 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))) (* 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))) (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* 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))) (* 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))) (* 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)
(+ (* -1/2 (* phi1 phi2)) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2))
(+ (* phi1 (- (* phi1 (+ 1/4 (* -1/2 (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)))) (* 1/2 phi2))) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2))
(+ (* phi1 (- (* phi1 (+ 1/4 (+ (* -1/2 (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (* 1/12 (* phi1 phi2))))) (* 1/2 phi2))) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* phi2 (- (+ (/ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* phi2 (- (+ (/ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* phi2 (- (+ (/ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(* -1/2 phi2)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* -1/2 phi2)
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* -1/2 phi2)
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(* 1/2 lambda1)
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 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 (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(pow (sin (neg (* 1/2 phi2))) 2)
(+ (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (pow (sin (neg (* 1/2 phi2))) 2))
(+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (pow (sin (neg (* 1/2 phi2))) 2))
(+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (+ (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)) (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (pow (sin (neg (* 1/2 phi2))) 2))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (sin (* 1/2 phi1)) 2)
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (pow (sin (* 1/2 phi1)) 2))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))) (pow (sin (* 1/2 phi1)) 2))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)
(pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)
(pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)
(pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)
(- (+ 1/2 (* 1/2 (cos (neg phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (* -1/4 (cos (neg phi2))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (* -1/4 (cos phi1)) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(cos (neg phi2))
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(+ 1/2 (* -1/2 (cos (neg lambda2))))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* 1/2 (* lambda1 (sin (neg lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/2 (sin (neg lambda2))) (* lambda1 (+ (* -1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2)))))))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* lambda2 (cos lambda1)))))))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (+ (* 1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1))))))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(cos (* -2 phi2))
(+ (cos (* -2 phi2)) (* -2 (* phi1 (sin (* -2 phi2)))))
(+ (cos (* -2 phi2)) (* phi1 (- (* -2 (* phi1 (cos (* -2 phi2)))) (* 2 (sin (* -2 phi2))))))
(+ (cos (* -2 phi2)) (* phi1 (- (* phi1 (+ (* -2 (cos (* -2 phi2))) (* 4/3 (* phi1 (sin (* -2 phi2)))))) (* 2 (sin (* -2 phi2))))))
(cos (* 2 (- phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos (* -2 (+ phi2 (* -1 phi1))))
(cos (* -2 (+ phi2 (* -1 phi1))))
(cos (* -2 (+ phi2 (* -1 phi1))))
(cos (* -2 (+ phi2 (* -1 phi1))))
(cos (* 2 phi1))
(+ (cos (* 2 phi1)) (* 2 (* phi2 (sin (* 2 phi1)))))
(+ (cos (* 2 phi1)) (* phi2 (- (* -2 (* phi2 (cos (* 2 phi1)))) (* -2 (sin (* 2 phi1))))))
(+ (cos (* 2 phi1)) (* phi2 (- (* phi2 (+ (* -2 (cos (* 2 phi1))) (* -4/3 (* phi2 (sin (* 2 phi1)))))) (* -2 (sin (* 2 phi1))))))
(cos (* 2 (- phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos (* 2 (+ phi1 (* -1 phi2))))
(cos (* 2 (+ phi1 (* -1 phi2))))
(cos (* 2 (+ phi1 (* -1 phi2))))
(cos (* 2 (+ phi1 (* -1 phi2))))
(cos (neg phi2))
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(+ 1/2 (* -1/2 (cos (neg lambda2))))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* 1/2 (* lambda1 (sin (neg lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/2 (sin (neg lambda2))) (* lambda1 (+ (* -1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2)))))))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* lambda2 (cos lambda1)))))))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (+ (* 1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1))))))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
Outputs
(* -1/2 lambda2)
(*.f64 #s(literal -1/2 binary64) lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal -1/2 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal -1/2 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal -1/2 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) lambda1))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(neg.f64 (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64))))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(neg.f64 (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64))))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(neg.f64 (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64))))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal -1/2 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal -1/2 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal -1/2 binary64) lambda2 (*.f64 #s(literal 1/2 binary64) lambda1))
(* -1/2 lambda2)
(*.f64 #s(literal -1/2 binary64) lambda2)
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* -1/2 lambda2)
(*.f64 #s(literal -1/2 binary64) lambda2)
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (neg.f64 lambda2))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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)))
(+.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 phi2 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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)))
(+ (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (*.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (*.f64 phi1 (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 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 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 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 (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(fma.f64 phi1 (*.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (+ (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)) (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(fma.f64 phi1 (*.f64 phi1 (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 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 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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)))
(+.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 phi2 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (neg.f64 lambda2))
(* -1 phi2)
(neg.f64 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
phi1
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* 1/2 (cos (neg lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2))
(- (* -1/2 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2))))
(*.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)))
(- (* lambda1 (- (* -1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))
(- (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2))))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) #s(literal 1/12 binary64) (*.f64 #s(literal -1/4 binary64) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos lambda1))
(*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))
(- (* 1/2 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))
(- (* lambda2 (- (* -1/4 (* lambda2 (cos lambda1))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))
(- (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1)))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/12 binary64) (*.f64 #s(literal -1/4 binary64) (cos.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1/2 (* 1/2 (cos (neg lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))
(- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64))
(- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) #s(literal -1/12 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda2) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))
(- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal 1/12 binary64) lambda2) (sin.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2)))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64))
(+ (* -1/4 (* phi1 (sin (* -2 phi2)))) (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2))))))
(fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64)))))
(+ (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2))))) (* phi1 (+ (* -1/4 (sin (* -2 phi2))) (* -1/4 (* phi1 (cos (* -2 phi2)))))))
(fma.f64 phi1 (*.f64 #s(literal -1/4 binary64) (fma.f64 phi1 (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))
(+ (* 1/4 (+ 1/2 (* 1/2 (cos (* -2 phi2))))) (* phi1 (+ (* -1/4 (sin (* -2 phi2))) (* phi1 (+ (* -1/4 (cos (* -2 phi2))) (* 1/6 (* phi1 (sin (* -2 phi2)))))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))) (*.f64 #s(literal -1/4 binary64) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1)))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1)))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1)))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* -2 (+ phi2 (* -1 phi1)))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64))
(+ (* 1/4 (* phi2 (sin (* 2 phi1)))) (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 #s(literal 1/4 binary64) (fma.f64 phi2 (sin.f64 (*.f64 phi1 #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(+ (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* phi2 (+ (* -1/4 (* phi2 (cos (* 2 phi1)))) (* 1/4 (sin (* 2 phi1))))))
(fma.f64 phi2 (fma.f64 #s(literal 1/4 binary64) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/4 binary64) phi2) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))
(+ (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* phi2 (+ (* 1/4 (sin (* 2 phi1))) (* phi2 (+ (* -1/4 (cos (* 2 phi1))) (* -1/6 (* phi2 (sin (* 2 phi1)))))))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (- phi1 phi2))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2)))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2)))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2)))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (+ phi1 (* -1 phi2)))))))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(* -1 phi2)
(neg.f64 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
phi1
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (neg.f64 lambda2))
(- (+ (* (cos phi1) (pow (sin (* 1/2 lambda1)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda2 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (sin (* -1/2 lambda2)) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda1 (fma.f64 (*.f64 lambda1 (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 (*.f64 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 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(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) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))
(+ (* -1/2 (* phi1 phi2)) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi2) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)))
(+ (* phi1 (- (* phi1 (+ 1/4 (* -1/2 (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)))) (* 1/2 phi2))) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/2 binary64) phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)))
(+ (* phi1 (- (* phi1 (+ 1/4 (+ (* -1/2 (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (* 1/12 (* phi1 phi2))))) (* 1/2 phi2))) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/12 binary64) (*.f64 phi1 phi2) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(- (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))
(* phi2 (- (+ (/ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 phi2 (fma.f64 (cos.f64 phi1) (/.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) phi2) (-.f64 (/.f64 (pow.f64 (sin.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 (- (+ (/ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 phi2 (fma.f64 (cos.f64 phi1) (/.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) phi2) (-.f64 (/.f64 (pow.f64 (sin.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 (- (+ (/ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) phi2) (/ (pow (sin (* 1/2 phi1)) 2) phi2)) (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 phi2 (fma.f64 (cos.f64 phi1) (/.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) phi2) (-.f64 (/.f64 (pow.f64 (sin.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))))))
(* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(neg.f64 (*.f64 phi2 (+.f64 (/.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (neg.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(neg.f64 (*.f64 phi2 (+.f64 (/.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (neg.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* -1 (* phi2 (- (* -1 (/ (+ (* (cos phi1) (pow (+ (* (cos (* -1/2 lambda2)) (sin (* 1/2 lambda1))) (* (cos (* 1/2 lambda1)) (sin (* -1/2 lambda2)))) 2)) (pow (sin (* 1/2 phi1)) 2)) phi2)) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))
(neg.f64 (*.f64 phi2 (+.f64 (/.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (neg.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (neg.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (neg.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (neg.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64)) (neg.f64 phi2))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64)) (neg.f64 phi2))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64)) (neg.f64 phi2))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(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 lambda1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (sin.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 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (*.f64 #s(literal -1/48 binary64) lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(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 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.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 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(-.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))))
(- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(-.f64 (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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))))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(-.f64 (fma.f64 phi1 (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 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (neg.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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))))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(fma.f64 phi1 (fma.f64 phi1 (neg.f64 (fma.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* phi2 (- (* -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 phi2 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- (+ 1 (* phi2 (- (* 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 phi2 (fma.f64 phi2 (neg.f64 (fma.f64 phi2 (*.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)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (neg.f64 lambda1) #s(literal 1 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))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda1 (neg.f64 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) (-.f64 #s(literal 1 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))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) (-.f64 #s(literal 1 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))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (neg.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(fma.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (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 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(fma.f64 phi2 (fma.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (+.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (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 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 phi2 (fma.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) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (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 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(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 phi1 (*.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))))) (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 phi1 (*.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 phi1 (+.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (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)) (/.f64 (*.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 (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)))))) (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 phi1 (fma.f64 phi1 (*.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 (+.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (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)) (/.f64 (*.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 (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 phi1 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal -1/6 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (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)) (/.f64 (*.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 (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 (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 #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))))))) (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 phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 1/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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(fma.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (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))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 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))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (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))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (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))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* -1/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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(fma.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(pow (sin (neg (* 1/2 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))
(+ (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (pow (sin (neg (* 1/2 phi2))) 2))
(*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (pow (sin (neg (* 1/2 phi2))) 2))
(fma.f64 phi1 (*.f64 phi1 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))
(+ (* phi1 (+ (* phi1 (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (+ (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)) (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))) (pow (sin (neg (* 1/2 phi2))) 2))
(fma.f64 phi1 (*.f64 phi1 (fma.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 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (sin (* 1/2 phi1)) 2)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (sin (* 1/2 phi1)) 2))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi2 (*.f64 phi2 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))))))) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi2 (*.f64 phi2 (fma.f64 phi2 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(- (+ 1/2 (* 1/2 (cos (neg phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (* -1/4 (cos (neg phi2))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/4 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (neg.f64 (*.f64 (sin.f64 phi2) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/4 binary64) (cos.f64 phi2) (fma.f64 #s(literal 1/12 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 (sin.f64 phi2) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (* -1/4 (cos phi1)) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/12 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda1) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(cos (neg phi2))
(cos.f64 phi2)
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(+ 1/2 (* -1/2 (cos (neg lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* 1/2 (* lambda1 (sin (neg lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2)))))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/2 (sin (neg lambda2))) (* lambda1 (+ (* -1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2)))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) #s(literal -1/12 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda2) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* lambda2 (cos lambda1)))))))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (+ (* 1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1))))))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal 1/12 binary64) lambda2) (sin.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(cos (* -2 phi2))
(cos.f64 (*.f64 phi2 #s(literal -2 binary64)))
(+ (cos (* -2 phi2)) (* -2 (* phi1 (sin (* -2 phi2)))))
(fma.f64 (*.f64 #s(literal -2 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))))
(+ (cos (* -2 phi2)) (* phi1 (- (* -2 (* phi1 (cos (* -2 phi2)))) (* 2 (sin (* -2 phi2))))))
(fma.f64 phi1 (*.f64 #s(literal -2 binary64) (fma.f64 phi1 (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))))
(+ (cos (* -2 phi2)) (* phi1 (- (* phi1 (+ (* -2 (cos (* -2 phi2))) (* 4/3 (* phi1 (sin (* -2 phi2)))))) (* 2 (sin (* -2 phi2))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 4/3 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))))
(cos (* 2 (- phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* -2 (+ phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal -2 binary64) (-.f64 phi2 phi1)))
(cos (* -2 (+ phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal -2 binary64) (-.f64 phi2 phi1)))
(cos (* -2 (+ phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal -2 binary64) (-.f64 phi2 phi1)))
(cos (* -2 (+ phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal -2 binary64) (-.f64 phi2 phi1)))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(+ (cos (* 2 phi1)) (* 2 (* phi2 (sin (* 2 phi1)))))
(fma.f64 (*.f64 #s(literal 2 binary64) phi2) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))
(+ (cos (* 2 phi1)) (* phi2 (- (* -2 (* phi2 (cos (* 2 phi1)))) (* -2 (sin (* 2 phi1))))))
(fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))
(+ (cos (* 2 phi1)) (* phi2 (- (* phi2 (+ (* -2 (cos (* 2 phi1))) (* -4/3 (* phi2 (sin (* 2 phi1)))))) (* -2 (sin (* 2 phi1))))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -4/3 binary64) phi2) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))
(cos (* 2 (- phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (- phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (+ phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (+ phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (+ phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (* 2 (+ phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos (neg phi2))
(cos.f64 phi2)
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(+ 1/2 (* -1/2 (cos (neg lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* 1/2 (* lambda1 (sin (neg lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2)))))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/2 (sin (neg lambda2))) (* lambda1 (+ (* -1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2)))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) #s(literal -1/12 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda2) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* lambda2 (cos lambda1)))))))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (+ (* 1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1))))))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal 1/12 binary64) lambda2) (sin.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (pow.f64 (sin.f64 (*.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (*.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* -1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (*.f64 phi1 (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 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 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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)))
(+.f64 (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 phi2 (*.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)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/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 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/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 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 lambda2 (fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 #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 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (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 phi1 (fma.f64 phi1 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal -1/8 binary64) (*.f64 (*.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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 phi2 (fma.f64 phi2 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 (* -1 (* phi1 (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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))))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* -1/2 phi2)) 2)))))) (* (cos (* -1/2 phi2)) (sin (* -1/2 phi2)))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(-.f64 (fma.f64 phi1 (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 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (neg.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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))))
(- (+ 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 phi1 (fma.f64 phi1 (neg.f64 (fma.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* -1/2 (+ phi2 (* -1 phi1)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))
(- (+ 1 (* phi2 (- (* -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 phi2 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- (+ 1 (* phi2 (- (* 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 phi2 (fma.f64 phi2 (neg.f64 (fma.f64 phi2 (*.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)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (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) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (+ phi1 (* -1 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (neg.f64 lambda1) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (neg.f64 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)))) (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2))) #s(literal -1/6 binary64)))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (+ lambda2 (* -1 lambda1)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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)))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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)))
(fma.f64 lambda2 (fma.f64 lambda2 (neg.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (* -1 lambda2)))) 2))) (pow (sin (* 1/2 (- phi1 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))

rewrite478.0ms (0.9%)

Memory
-1.2MiB live, 431.7MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
4 298×lower-*.f32
4 246×lower-*.f64
3 794×lower-fma.f32
3 784×lower-fma.f64
2 002×lower-pow.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0113510
0196520
1678327
24861325
08182317
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
27 → 897
Calls
Call 1
Inputs
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(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))))))
Outputs
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))
(-.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))
(fma.f64 lambda1 #s(literal 1/2 binary64) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 lambda1) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 lambda1) (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) lambda1 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 lambda1) #s(literal -1/2 binary64) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 lambda1) #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(fma.f64 (neg.f64 lambda1) #s(literal -1/2 binary64) (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 lambda1 #s(literal -1/2 binary64)) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1 binary64) (*.f64 lambda1 #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) (*.f64 lambda1 #s(literal -1/2 binary64)) (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal -2 binary64))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 2 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 2 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64))) (*.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))) (fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 lambda1 lambda2))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 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 4 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 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 4 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 0 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))
(neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 #s(literal 0 binary64) (fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 phi2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 phi2 #s(literal 1/2 binary64))))
(*.f64 phi2 #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) phi2)
(*.f64 #s(literal 1/2 binary64) (neg.f64 phi2))
(*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) #s(literal -1 binary64))
(*.f64 (neg.f64 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))
(+.f64 lambda1 (neg.f64 lambda2))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 (*.f64 #s(literal 1 binary64) lambda1) (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))
(+.f64 (*.f64 lambda1 #s(literal 1 binary64)) (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 lambda1 lambda2))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(pow.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(+.f64 phi1 (neg.f64 phi2))
(+.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(+.f64 (neg.f64 phi2) phi1)
(+.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))
(-.f64 phi1 phi2)
(-.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))
(fma.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi1) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))
(fma.f64 #s(literal -1 binary64) phi2 phi1)
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 phi1) (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))))
(/.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (neg.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) (neg.f64 (+.f64 phi2 phi1)))
(/.f64 (fma.f64 phi1 (*.f64 phi1 phi1) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (fma.f64 phi1 phi1 (-.f64 (*.f64 (neg.f64 phi2) (neg.f64 phi2)) (*.f64 phi1 (neg.f64 phi2)))))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) (+.f64 phi2 phi1))
(/.f64 (*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) #s(literal 1 binary64)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1 binary64)) (+.f64 phi2 phi1))
(pow.f64 (/.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 phi2 phi1) (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))
(*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 0 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64)))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(+.f64 #s(literal 1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64)) #s(literal 1/8 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) #s(literal 1/8 binary64))
(fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/8 binary64))
(fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64) #s(literal 1/8 binary64))
(fma.f64 #s(literal 1/8 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) #s(literal 1/8 binary64))
(/.f64 (+.f64 #s(literal 1/512 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/64 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64))))))
(/.f64 (-.f64 #s(literal 1/64 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64))))
(/.f64 (*.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1/4 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(*.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))
(*.f64 (cos.f64 (-.f64 phi1 phi2)) (*.f64 #s(literal 1/4 binary64) (cos.f64 (-.f64 phi1 phi2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(*.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi1 phi2)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+.f64 phi1 (neg.f64 phi2))
(+.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(+.f64 (neg.f64 phi2) phi1)
(+.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))
(-.f64 phi1 phi2)
(-.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))
(fma.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi1) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))
(fma.f64 #s(literal -1 binary64) phi2 phi1)
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 phi1) (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))))
(/.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (neg.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) (neg.f64 (+.f64 phi2 phi1)))
(/.f64 (fma.f64 phi1 (*.f64 phi1 phi1) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (fma.f64 phi1 phi1 (-.f64 (*.f64 (neg.f64 phi2) (neg.f64 phi2)) (*.f64 phi1 (neg.f64 phi2)))))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) (+.f64 phi2 phi1))
(/.f64 (*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) #s(literal 1 binary64)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1 binary64)) (+.f64 phi2 phi1))
(pow.f64 (/.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 phi2 phi1) (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))
(*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(+.f64 lambda1 (neg.f64 lambda2))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 (*.f64 #s(literal 1 binary64) lambda1) (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))
(+.f64 (*.f64 lambda1 #s(literal 1 binary64)) (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 lambda1 lambda2))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(pow.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(+.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))))
(-.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))) (/.f64 (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))
(fma.f64 phi2 (neg.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (cos.f64 phi1)) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (cos.f64 phi1) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))))) (pow.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) #s(literal 2 binary64)))) (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 phi2) (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 #s(literal -1 binary64) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))) (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 phi2 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) phi2 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (neg.f64 (*.f64 phi2 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (*.f64 (neg.f64 phi2) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))) (sin.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) (neg.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1)))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))))))))
(+.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64)))
(+.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))
(-.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))
(-.f64 (fma.f64 phi1 #s(literal 1/2 binary64) #s(literal 0 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))
(fma.f64 phi2 #s(literal -1/2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) phi2 (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 phi2 #s(literal -1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 phi2) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) #s(literal -1 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 phi2) #s(literal 1/2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal -2 binary64))
(/.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))
(/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))
(/.f64 (-.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal -1/8 binary64))) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal -1/8 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 #s(literal 1/8 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(/.f64 (-.f64 (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) (+.f64 phi2 phi1))
(/.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (+.f64 phi2 phi1))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)) #s(literal -1 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 #s(literal -1/2 binary64)))
(neg.f64 (*.f64 lambda1 #s(literal -1/2 binary64)))
(/.f64 lambda1 #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda1))
(/.f64 (neg.f64 lambda1) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal -1 binary64))
(*.f64 lambda1 #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (neg.f64 lambda1))
(*.f64 #s(literal 1/2 binary64) lambda1)
(*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 lambda1 #s(literal -1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1 binary64))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1/2 binary64)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(exp.f64 (log.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(exp.f64 (*.f64 (log.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (*.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (*.f64 #s(literal 1/4 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) (cos.f64 (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) (sin.f64 (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi1 phi2))))
(cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(cos.f64 (+.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (cos.f64 (*.f64 (neg.f64 phi2) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 2 binary64))) (sin.f64 (*.f64 (neg.f64 phi2) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 2 binary64) (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 2 binary64) (neg.f64 phi2)))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (neg.f64 (sin.f64 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (neg.f64 (sin.f64 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))
(fma.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 6 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 6 binary64))) (+.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) (cos.f64 (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) (sin.f64 (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
#s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (+.f64 lambda2 (neg.f64 lambda1))))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (*.f64 phi2 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (fma.f64 phi1 #s(literal 1/2 binary64) #s(literal 0 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 phi1 #s(literal 1/2 binary64) #s(literal 0 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(/.f64 (fma.f64 (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 1 binary64))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 1 binary64))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal 1 binary64))))

eval769.0ms (1.4%)

Memory
34.7MiB live, 1 471.1MiB allocated
Compiler

Compiled 308 646 to 15 093 computations (95.1% saved)

prune1.5s (2.7%)

Memory
31.9MiB live, 2 514.5MiB allocated
Pruning

232 alts after pruning (232 fresh and 0 done)

PrunedKeptTotal
New3 2341163 350
Fresh69116185
Picked505
Done000
Total3 3082323 540
Accuracy
82.9%
Counts
3 540 → 232
Alt Table
Click to see full alt table
StatusAccuracyProgram
47.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
45.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
16.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
21.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
21.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
59.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
16.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
21.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
22.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
19.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
28.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
26.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
61.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
44.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
46.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
19.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
11.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
16.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
28.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
34.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
27.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
30.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
28.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
24.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
23.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
27.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
30.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
30.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
44.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
27.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
▶59.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
46.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
59.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
46.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
27.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
27.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
54.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
42.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
27.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
27.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
60.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
60.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
57.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
59.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
59.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
39.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
23.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
46.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
43.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
41.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
54.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
46.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
37.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
36.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
38.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
44.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
45.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
48.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
45.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
38.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
39.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
46.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
45.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
45.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
45.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
44.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
22.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
34.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
26.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
29.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
37.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
34.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
41.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
42.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
39.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
25.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
27.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
▶41.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
25.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
42.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
27.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
41.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
60.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
34.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
41.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
46.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
44.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
47.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
25.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
30.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
36.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
42.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
▶33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
60.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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))))))))))
60.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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))))))))))
61.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
49.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))
79.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
61.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
64.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
50.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (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)))))))))
42.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))))))))
49.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
42.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
▶80.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
61.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
61.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
55.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))
71.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
21.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
58.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
55.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
80.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
54.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.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)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (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))))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
60.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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))))))))))
63.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
▶63.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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
50.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
52.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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)))))))))
36.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
48.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
40.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
42.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
18.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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
45.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.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))))))))))
49.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 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 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) (/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))))))
63.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
37.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
19.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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
52.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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)))))))))
52.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
54.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 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
55.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
50.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
49.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
51.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 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
48.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))))) (-.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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
18.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 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
49.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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
46.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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #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))))))))))
55.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)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
55.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
56.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
16.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
16.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
53.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
44.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
44.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
45.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
26.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
14.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
36.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
33.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
30.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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)))))))))
33.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
42.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
13.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
31.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
35.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
43.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
59.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
56.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
38.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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))))))))))
49.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
43.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
25.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
35.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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #s(approx (/ (- lambda1 lambda2) 2) (*.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
13.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #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)))))))))
33.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
35.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
38.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (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))))))))))
38.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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))))))))))
39.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
39.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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)))))))))
32.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 (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
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 (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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))))) (fma.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
Compiler

Compiled 39 480 to 19 918 computations (49.5% saved)

simplify450.0ms (0.8%)

Memory
7.9MiB live, 638.3MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓cost-diff320
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
✓cost-diff320
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
✓cost-diff13248
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
✓cost-diff320
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
✓cost-diff320
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
✓cost-diff384
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
✓cost-diff384
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
✓cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))))
✓cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
✓cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
✓cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
✓cost-diff256
(-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
✓cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
✓cost-diff0
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
✓cost-diff128
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
✓cost-diff384
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
✓cost-diff768
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
Rules
16 912×lower-fma.f32
16 886×lower-fma.f64
3 894×lower-*.f32
3 808×lower-+.f32
3 806×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01723183
03133108
15342696
210892687
327252667
083802608
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(*.f64 phi2 #s(literal -1/2 binary64))
phi2
#s(literal -1/2 binary64)
(cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 phi1 #s(literal 1/2 binary64))
phi1
#s(literal 1/2 binary64)
(*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 phi2 #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
#s(literal 1 binary64)
#s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) phi1)
(cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(*.f64 #s(literal -1/2 binary64) phi2)
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))
(cos.f64 phi2)
phi2
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 lambda1)
lambda1
#s(literal 1/2 binary64)
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(-.f64 phi1 phi2)
(sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(*.f64 #s(literal 2 binary64) R)
R
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))))
(*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))
#s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))
(fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))
(sin.f64 phi2)
(sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(-.f64 phi1 phi2)
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(*.f64 #s(literal 2 binary64) R)
R
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))
(*.f64 lambda1 #s(literal 1/2 binary64))
lambda1
#s(literal 1/2 binary64)
(cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))
(*.f64 lambda2 #s(literal 1/2 binary64))
lambda2
(*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))
(sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(-.f64 lambda1 lambda2)
(sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(literal 1 binary64)
(fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
(sin.f64 phi2)
(sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
#s(literal 1/4 binary64)
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(-.f64 phi1 phi2)
#s(literal 1 binary64)
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))
(neg.f64 (cos.f64 phi1))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 2 binary64) R)
R
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
R
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))))
#s(literal 2 binary64)
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))))
(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(*.f64 phi2 #s(literal -1/2 binary64))
phi2
#s(literal -1/2 binary64)
(cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 phi1 #s(literal 1/2 binary64))
phi1
#s(literal 1/2 binary64)
(*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 phi2 #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))
(sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))))
(-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
#s(literal 1 binary64)
#s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))
#s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) phi1)
(*.f64 phi1 #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))
(*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))
(sin.f64 (*.f64 #s(literal -1/2 binary64) phi2))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64))))) (*.f64 R #s(literal 2 binary64)))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64)))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))
(cos.f64 phi2)
phi2
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 lambda1)
lambda1
#s(literal 1/2 binary64)
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 phi1 phi2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 phi1 phi2)
#s(literal 2 binary64)
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))
(-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(*.f64 #s(literal 2 binary64) R)
(*.f64 R #s(literal 2 binary64))
R
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))))))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))
(atan2.f64 (sqrt.f64 (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))))))
(sqrt.f64 (fma.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))
(fma.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(-.f64 lambda1 lambda2)
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))))
(fma.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))
#s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))
(fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))
(sin.f64 phi2)
(sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 phi1 phi2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 phi1 phi2)
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(*.f64 #s(literal 2 binary64) R)
(*.f64 R #s(literal 2 binary64))
R
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(sqrt.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.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 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.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)))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
phi1
phi2
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))
(*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))
(sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(*.f64 lambda1 #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) lambda1)
lambda1
#s(literal 1/2 binary64)
(cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))
(*.f64 lambda2 #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) lambda2)
lambda2
(*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))
(cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(sqrt.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
#s(literal 1 binary64)
(fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(-.f64 lambda1 lambda2)
#s(literal -1/2 binary64)
(fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(cos.f64 (-.f64 phi1 phi2))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(-.f64 phi1 phi2)
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (fma.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) #s(literal 1/2 binary64)))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
(*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(cos.f64 phi2)
phi2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(-.f64 lambda1 lambda2)
#s(literal 2 binary64)
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi1)
(sin.f64 phi2)
(sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)))
#s(literal 1/4 binary64)
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(cos.f64 (-.f64 phi1 phi2))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(-.f64 phi1 phi2)
(-.f64 phi1 phi2)
#s(literal 1 binary64)
(*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 phi1)))
(neg.f64 (cos.f64 phi1))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(-.f64 lambda1 lambda2)
#s(literal -1/2 binary64)
(-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) R)
(*.f64 R #s(literal 2 binary64))
R

localize1.8s (3.2%)

Memory
-4.3MiB live, 2 583.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓accuracy79.3%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
✓accuracy79.2%
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
✓accuracy79.2%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
✓accuracy75.5%
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
✓accuracy79.3%
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
✓accuracy79.2%
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
✓accuracy75.8%
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
✓accuracy75.5%
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
✓accuracy79.3%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
✓accuracy79.2%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
✓accuracy75.5%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
✓accuracy50.5%
#s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))
✓accuracy75.5%
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
✓accuracy75.0%
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
✓accuracy58.5%
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
✓accuracy48.6%
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
✓accuracy99.1%
(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
✓accuracy98.7%
(-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
✓accuracy79.5%
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
✓accuracy79.5%
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
Samples
722.0ms155×1valid
540.0ms99×2valid
3.0ms2×0valid
Compiler

Compiled 2 904 to 146 computations (95% saved)

Precisions
Click to see histograms. Total time spent on operations: 1.1s
ival-cos: 410.0ms (37.2% of total)
ival-sin: 221.0ms (20% of total)
ival-mult: 182.0ms (16.5% of total)
adjust: 102.0ms (9.2% of total)
ival-pow2: 49.0ms (4.4% of total)
ival-add: 42.0ms (3.8% of total)
ival-sqrt: 31.0ms (2.8% of total)
ival-sub: 29.0ms (2.6% of total)
ival-atan2: 25.0ms (2.3% of total)
ival-div: 9.0ms (0.8% 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)

series196.0ms (0.3%)

Memory
-4.7MiB live, 198.3MiB allocated
Counts
29 → 876
Calls
Call 1
Inputs
#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())
Outputs
#s(alt (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))) (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (patch (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 lambda1) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 lambda2) (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2)) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 lambda2) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf phi1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda1) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)) (taylor -inf lambda2) (#s(alt (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (patch (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf R) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))))))) (taylor -inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))))))) (taylor -inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))))))) (taylor -inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))))))) (taylor -inf phi2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf phi1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf lambda1) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor 0 lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))))))) (taylor -inf lambda2) (#s(alt (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (patch (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg lambda2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (- (* -1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2))))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos lambda1)) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (- (* -1/4 (* lambda2 (cos lambda1))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1)))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/4 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/2 (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/4 (cos (- lambda1 lambda2))) (* 1/48 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/4 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/1440 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/48 (cos (- lambda1 lambda2))))))))) (taylor 0 phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* 1/2 (* (cos phi1) (cos (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (* (cos phi1) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (sin (neg lambda2)))) (* -1/4 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (* (cos phi1) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/4 (* (cos phi1) (cos (neg lambda2)))) (* 1/12 (* lambda1 (* (cos phi1) (sin (neg lambda2))))))))))) (taylor 0 lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos lambda1) (cos phi1)))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (* lambda2 (* (cos phi1) (sin lambda1)))) (* 1/2 (* (cos lambda1) (cos phi1))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (* (cos lambda1) (cos phi1))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (cos phi1)))) (* 1/2 (* (cos phi1) (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* 1/2 (* (cos lambda1) (cos phi1))) (* lambda2 (+ (* 1/2 (* (cos phi1) (sin lambda1))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (cos phi1))) (* -1/12 (* lambda2 (* (cos phi1) (sin lambda1)))))))))) (taylor 0 lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- phi1 phi2)))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2))) (taylor -inf phi1) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 phi1) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 phi2) (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2)) (taylor inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 phi2) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) (patch (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- phi1 phi2) (taylor 0 phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ 1 (* -1 (/ phi2 phi1)))) (taylor inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor -inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (- (/ phi2 phi1) 1))) (taylor -inf phi1) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt phi1 (taylor 0 phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ phi1 (* -1 phi2)) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (- (/ phi1 phi2) 1)) (taylor inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (patch (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* -1/4 (cos phi2)))) (* 1/2 (sin phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* phi1 (- (* phi1 (- (+ (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/12 (* phi1 (sin phi2)))) (* -1/4 (cos phi2)))) (* 1/2 (sin phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* phi2 (- (* phi2 (- (+ (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/12 (* phi2 (sin phi1)))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* lambda1 (+ (* 1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (patch (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (patch (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 lambda1)) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2))) (taylor 0 phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf phi1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* phi2 (- (* phi2 (- (* -1 (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2))) (taylor -inf phi2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda1) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor 0 lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2))) (taylor -inf lambda2) (#s(alt (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (patch (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))))))) (taylor 0 phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))))))) (taylor 0 phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf phi1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 1/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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))))) (taylor 0 lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda1) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* -1/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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))))) (taylor 0 lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (taylor -inf lambda2) (#s(alt (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (patch #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (neg phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (* -1/4 (cos (neg phi2))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (* -1/4 (cos phi1)) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor -inf phi2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (taylor -inf lambda1) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (taylor inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (taylor -inf lambda2) (#s(alt #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (patch #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (pow lambda1 2)) (taylor 0 lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1/4 (* -1/48 (pow lambda1 2)))) (taylor 0 lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1/4 (* (pow lambda1 2) (- (* 1/1440 (pow lambda1 2)) 1/48)))) (taylor 0 lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1/4 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/1440 (* -1/80640 (pow lambda1 2)))) 1/48)))) (taylor 0 lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (neg phi2)) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (sin phi1))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg phi2)) (taylor 0 phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2))))) (taylor 0 phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (sin phi1))) (taylor 0 phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) (patch #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg phi2)) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2))))) (taylor 0 phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos phi1) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (sin phi1))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1))))) (taylor 0 phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- phi1 phi2)) (taylor inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 phi2)) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2)))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2))))))))) (taylor 0 phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 phi1)) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1))))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- phi1 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (patch (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* 1/2 (* lambda1 (sin (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/2 (sin (neg lambda2))) (* lambda1 (+ (* -1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* lambda2 (cos lambda1))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (+ (* 1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) (patch (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
Calls

219 calls:

TimeVariablePointExpression
38.0ms
lambda2
@inf
(- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))))
5.0ms
phi2
@0
(+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2))))))
3.0ms
lambda2
@inf
(+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2))))))
1.0ms
lambda1
@inf
(+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2))))))
1.0ms
phi2
@inf
(* R (* 2 (atan2 (sqrt (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (sqrt (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))))))))

simplify547.0ms (1%)

Memory
7.1MiB live, 804.9MiB allocated
Algorithm
1×egg-herbie
Rules
8 528×lower-fma.f64
8 528×lower-fma.f32
6 506×lower-+.f64
6 506×lower-+.f32
5 650×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0114621444
1378220940
0809019633
Stop Event
1×iter limit
1×node limit
Counts
876 → 864
Calls
Call 1
Inputs
(* (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))))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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))))))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 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))))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2)))
(* -1/2 lambda2)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(* 1/2 lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(* 1/2 lambda1)
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(* 1/2 lambda1)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(* -1/2 lambda2)
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(* -1/2 lambda2)
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi1)) 2)) (* phi2 (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))))))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* phi1 (+ (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (+ (* 1/4 (pow (cos (* 1/2 phi2)) 2)) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))))))))) (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(* -1 phi2)
(- phi1 phi2)
(- phi1 phi2)
(- phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
phi1
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(* -1 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* 1/2 (cos (neg lambda2)))
(- (* -1/2 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2))))
(- (* lambda1 (- (* -1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2))))
(- (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2))))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2))))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(* 1/2 (cos lambda1))
(- (* 1/2 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1)))
(- (* lambda2 (- (* -1/4 (* lambda2 (cos lambda1))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1)))
(- (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1)))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(- 1/2 (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+ 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (+ (* -1/4 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/2 (cos (- lambda1 lambda2)))))
(+ 1/2 (+ (* 1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/4 (cos (- lambda1 lambda2))) (* 1/48 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))
(+ 1/2 (+ (* 1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/4 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/1440 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/48 (cos (- lambda1 lambda2)))))))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg lambda2)))))
(+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* 1/2 (* (cos phi1) (cos (neg lambda2))))))
(+ 1/2 (+ (* 1/2 (* (cos phi1) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (sin (neg lambda2)))) (* -1/4 (* lambda1 (* (cos phi1) (cos (neg lambda2)))))))))
(+ 1/2 (+ (* 1/2 (* (cos phi1) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/4 (* (cos phi1) (cos (neg lambda2)))) (* 1/12 (* lambda1 (* (cos phi1) (sin (neg lambda2)))))))))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(+ 1/2 (* 1/2 (* (cos lambda1) (cos phi1))))
(+ 1/2 (+ (* 1/2 (* lambda2 (* (cos phi1) (sin lambda1)))) (* 1/2 (* (cos lambda1) (cos phi1)))))
(+ 1/2 (+ (* 1/2 (* (cos lambda1) (cos phi1))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (cos phi1)))) (* 1/2 (* (cos phi1) (sin lambda1)))))))
(+ 1/2 (+ (* 1/2 (* (cos lambda1) (cos phi1))) (* lambda2 (+ (* 1/2 (* (cos phi1) (sin lambda1))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (cos phi1))) (* -1/12 (* lambda2 (* (cos phi1) (sin lambda1))))))))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(- 1/2 (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos lambda1)))
(- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1)))
(- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(- 1/2 (* 1/2 (cos phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(* -1/2 phi2)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(+ (* -1/2 phi2) (* 1/2 phi1))
(* -1/2 phi2)
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(* -1/2 phi2)
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 phi2)
(- phi1 phi2)
(- phi1 phi2)
(- phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
phi1
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(* -1 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(- (+ 1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi2)))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi2)))
(- (+ 1/2 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* -1/4 (cos phi2)))) (* 1/2 (sin phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi2)))
(- (+ 1/2 (+ (* phi1 (- (* phi1 (- (+ (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/12 (* phi1 (sin phi2)))) (* -1/4 (cos phi2)))) (* 1/2 (sin phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi2)))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (+ (* phi2 (- (* phi2 (- (+ (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/12 (* phi2 (sin phi1)))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (+ (* lambda1 (+ (* 1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (+ (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (+ (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (+ (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (+ (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* -1/2 lambda2))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin (* 1/2 lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* -1/8 (* lambda2 (sin (* 1/2 lambda1)))))))
(+ (sin (* 1/2 lambda1)) (* lambda2 (+ (* -1/2 (cos (* 1/2 lambda1))) (* lambda2 (+ (* -1/8 (sin (* 1/2 lambda1))) (* 1/48 (* lambda2 (cos (* 1/2 lambda1)))))))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 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 (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 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 (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* -1/2 (* (* phi2 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* 1/2 (* (* phi2 (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))) (* phi2 (+ (* -1/2 (* (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (* -1/2 (/ (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (- (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (sin (* 1/2 phi1)) 2)) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* -1/2 (* (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda2 (+ (* -1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(- 1/2 (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(- 1/2 (* 1/2 (cos lambda1)))
(- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1)))
(- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(- (+ 1/2 (* 1/2 (cos (neg phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (* -1/4 (cos (neg phi2))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (* -1/4 (cos phi1)) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(* 1/4 (pow lambda1 2))
(* (pow lambda1 2) (+ 1/4 (* -1/48 (pow lambda1 2))))
(* (pow lambda1 2) (+ 1/4 (* (pow lambda1 2) (- (* 1/1440 (pow lambda1 2)) 1/48))))
(* (pow lambda1 2) (+ 1/4 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/1440 (* -1/80640 (pow lambda1 2)))) 1/48))))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (* -1/2 (cos lambda1)))
(cos (neg phi2))
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (neg phi2))
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (neg phi2))
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(sin (* -1/2 phi2))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin (* 1/2 phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/8 (sin (* 1/2 phi1))) (* 1/48 (* phi2 (cos (* 1/2 phi1)))))))))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(+ 1/2 (* -1/2 (cos (neg lambda2))))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* 1/2 (* lambda1 (sin (neg lambda2))))))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2)))))))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/2 (sin (neg lambda2))) (* lambda1 (+ (* -1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2)))))))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(+ 1/2 (* -1/2 (cos lambda1)))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* lambda2 (cos lambda1)))))))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (+ (* 1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1))))))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
Outputs
(* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))
(*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(+ (* -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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(+ (* (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 phi1 phi1) (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(+ (* (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 (*.f64 phi1 phi1) (fma.f64 (*.f64 (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 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(literal 1/2 binary64) (-.f64 lambda1 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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 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 (*.f64 phi2 phi2) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #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))) (* (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 (*.f64 phi2 phi2) (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 phi1)) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (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)))
(* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #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))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #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)))
(* (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)))
(* (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)))
(* (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)))
(* (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.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)))))) (* 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 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (cos.f64 phi1)))) (*.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 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #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)))
(* (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)))
(* (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)))
(* (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)))
(* (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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #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 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(* -1/2 lambda2)
(*.f64 lambda2 #s(literal -1/2 binary64))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* lambda1 (+ 1/2 (* -1/2 (/ lambda2 lambda1))))
(*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda2 lambda1) #s(literal 1/2 binary64)))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(neg.f64 (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64))))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(neg.f64 (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64))))
(* -1 (* lambda1 (- (* 1/2 (/ lambda2 lambda1)) 1/2)))
(neg.f64 (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda2 lambda1) #s(literal -1/2 binary64))))
(* 1/2 lambda1)
(*.f64 #s(literal 1/2 binary64) lambda1)
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (* -1/2 lambda2) (* 1/2 lambda1))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))
(* -1/2 lambda2)
(*.f64 lambda2 #s(literal -1/2 binary64))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* lambda2 (- (* 1/2 (/ lambda1 lambda2)) 1/2))
(*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (/.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(* -1/2 lambda2)
(*.f64 lambda2 #s(literal -1/2 binary64))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(neg.f64 (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(neg.f64 (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(* -1 (* lambda2 (+ 1/2 (* -1/2 (/ lambda1 lambda2)))))
(neg.f64 (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (/.f64 lambda1 lambda2) #s(literal 1/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 (*.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 #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 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (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 #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 phi2 (-.f64 (*.f64 phi2 (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 phi1)) (fma.f64 phi2 (*.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 (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 #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))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))
(fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(+ (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(fma.f64 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* phi1 (+ (* 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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* phi1 (+ (* 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 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (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) (fma.f64 phi1 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2)))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(-.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #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)))))
(+ (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (neg.f64 (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))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))) (* lambda2 (+ (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(fma.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))
(fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* 2 (* R (atan2 (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (sqrt (- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))))))
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(* -1 phi2)
(neg.f64 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
phi1
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* 1/2 (cos (neg lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2))
(- (* -1/2 (* lambda1 (sin (neg lambda2)))) (* -1/2 (cos (neg lambda2))))
(*.f64 #s(literal -1/2 binary64) (-.f64 (neg.f64 (*.f64 lambda1 (sin.f64 lambda2))) (cos.f64 lambda2)))
(- (* lambda1 (- (* -1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))
(- (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2))))) (* 1/2 (sin (neg lambda2))))) (* -1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (neg.f64 (*.f64 lambda1 (sin.f64 lambda2))) #s(literal 1/12 binary64) (*.f64 #s(literal -1/4 binary64) (cos.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos lambda1))
(*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))
(- (* 1/2 (* lambda2 (sin lambda1))) (* -1/2 (cos lambda1)))
(*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))
(- (* lambda2 (- (* -1/4 (* lambda2 (cos lambda1))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))
(- (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1)))) (* -1/2 (sin lambda1)))) (* -1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/12 binary64) (*.f64 #s(literal -1/4 binary64) (cos.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (- lambda1 lambda2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(* 1/2 (cos (+ lambda1 (* -1 lambda2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(- 1/2 (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (cos.f64 phi2))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(fma.f64 phi1 (fma.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 phi2) phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal -1/12 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(+.f64 (fma.f64 phi2 (fma.f64 #s(literal 1/4 binary64) (*.f64 phi2 (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal 1/12 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+ 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/4 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/2 (cos (- lambda1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* 1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/4 (cos (- lambda1 lambda2))) (* 1/48 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/48 binary64) (*.f64 phi1 phi1) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/4 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/1440 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/48 (cos (- lambda1 lambda2)))))))))
(fma.f64 (*.f64 phi1 phi1) (fma.f64 #s(literal -1/4 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/1440 binary64) (*.f64 phi1 phi1) #s(literal 1/48 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* 1/2 (* (cos phi1) (cos (neg lambda2))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (* (cos phi1) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (sin (neg lambda2)))) (* -1/4 (* lambda1 (* (cos phi1) (cos (neg lambda2)))))))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (cos.f64 lambda2)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (* (cos phi1) (cos (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi1) (sin (neg lambda2)))) (* lambda1 (+ (* -1/4 (* (cos phi1) (cos (neg lambda2)))) (* 1/12 (* lambda1 (* (cos phi1) (sin (neg lambda2)))))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (sin.f64 (neg.f64 lambda2))) (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (cos.f64 lambda2))) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (sin.f64 lambda2)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos lambda1) (cos phi1))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64))
(+ 1/2 (+ (* 1/2 (* lambda2 (* (cos phi1) (sin lambda1)))) (* 1/2 (* (cos lambda1) (cos phi1)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* 1/2 (* (cos lambda1) (cos phi1))) (* lambda2 (+ (* -1/4 (* lambda2 (* (cos lambda1) (cos phi1)))) (* 1/2 (* (cos phi1) (sin lambda1)))))))
(fma.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* 1/2 (* (cos lambda1) (cos phi1))) (* lambda2 (+ (* 1/2 (* (cos phi1) (sin lambda1))) (* lambda2 (+ (* -1/4 (* (cos lambda1) (cos phi1))) (* -1/12 (* lambda2 (* (cos phi1) (sin lambda1))))))))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (cos.f64 phi1))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (sin.f64 lambda1))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (- lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (* (cos phi1) (cos (+ lambda1 (* -1 lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 lambda2 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 lambda2 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 lambda2 lambda1) lambda1)
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (neg.f64 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (neg.f64 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (neg.f64 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(- 1/2 (* 1/2 (cos (neg lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))
(- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 lambda1 (sin.f64 lambda2))) (cos.f64 lambda2)) #s(literal 1/2 binary64))
(- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda1) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))
(- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal 1/12 binary64) (*.f64 lambda2 (sin.f64 lambda1)) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))
(- (+ 1/2 (* 1/2 (* phi1 (sin (neg phi2))))) (* 1/2 (cos (neg phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (cos.f64 phi2))))
(- (+ 1/2 (* phi1 (- (* 1/4 (* phi1 (cos (neg phi2)))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(fma.f64 phi1 (fma.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 phi2) phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))
(- (+ 1/2 (* phi1 (- (* phi1 (- (* -1/12 (* phi1 (sin (neg phi2)))) (* -1/4 (cos (neg phi2))))) (* -1/2 (sin (neg phi2)))))) (* 1/2 (cos (neg phi2))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal -1/12 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* -1/2 (* phi2 (sin phi1)))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))))
(- (+ 1/2 (* phi2 (- (* 1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(+.f64 (fma.f64 phi2 (fma.f64 #s(literal 1/4 binary64) (*.f64 phi2 (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))
(- (+ 1/2 (* phi2 (- (* phi2 (- (* 1/12 (* phi2 (sin phi1))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1))))) (* 1/2 (cos phi1)))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal 1/12 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (- phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(- 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* phi1 (+ 1/2 (* -1/2 (/ phi2 phi1))))
(*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(neg.f64 (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64))))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(neg.f64 (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64))))
(* -1 (* phi1 (- (* 1/2 (/ phi2 phi1)) 1/2)))
(neg.f64 (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1) #s(literal -1/2 binary64))))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(+ (* -1/2 phi2) (* 1/2 phi1))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* phi2 (- (* 1/2 (/ phi1 phi2)) 1/2))
(*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2) #s(literal -1/2 binary64)))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(*.f64 (neg.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64)))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(*.f64 (neg.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64)))
(* -1 (* phi2 (+ 1/2 (* -1/2 (/ phi1 phi2)))))
(*.f64 (neg.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2) #s(literal 1/2 binary64)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 lambda2 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 lambda2 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 lambda2 lambda1) lambda1)
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 lambda2 (/.f64 lambda1 lambda2) (neg.f64 lambda2))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (neg.f64 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (neg.f64 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (neg.f64 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(* -1 phi2)
(neg.f64 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1)
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(neg.f64 (fma.f64 phi1 (/.f64 phi2 phi1) (neg.f64 phi1)))
phi1
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* phi2 (- (/ phi1 phi2) 1))
(fma.f64 phi2 (/.f64 phi1 phi2) (neg.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(neg.f64 (fma.f64 phi2 (/.f64 phi1 (neg.f64 phi2)) phi2))
(- (+ 1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin phi2))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* phi1 (- (* phi1 (- (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* -1/4 (cos phi2)))) (* 1/2 (sin phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* phi1 (- (* phi1 (- (+ (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/12 (* phi1 (sin phi2)))) (* -1/4 (cos phi2)))) (* 1/2 (sin phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/12 binary64) (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal 1/4 binary64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(+.f64 (fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* phi2 (- (* phi2 (- (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* phi2 (- (* phi2 (- (+ (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))) (* 1/12 (* phi2 (sin phi1)))) (* -1/4 (cos phi1)))) (* 1/2 (sin phi1)))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/12 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1/4 binary64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(- (+ 1/2 (+ (* 1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(fma.f64 (fma.f64 lambda1 (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (+ (* lambda1 (+ (* 1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 (fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(- (+ 1/2 (+ (* lambda1 (+ (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda1) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1)))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(- (+ 1/2 (+ (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(- (+ 1/2 (+ (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(- (+ 1/2 (+ (* lambda2 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* 1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(- (+ 1/2 (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))))) (* 1/2 (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal -1/8 binary64) (*.f64 (*.f64 #s(literal -1/48 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (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 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.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 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 lambda2))
(sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 lambda2)) (* 1/2 (* lambda1 (cos (* -1/2 lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* -1/8 (* lambda1 (sin (* -1/2 lambda2)))) (* 1/2 (cos (* -1/2 lambda2))))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda1) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 lambda2)) (* lambda1 (+ (* 1/2 (cos (* -1/2 lambda2))) (* lambda1 (+ (* -1/8 (sin (* -1/2 lambda2))) (* -1/48 (* lambda1 (cos (* -1/2 lambda2)))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal -1/8 binary64) (*.f64 (*.f64 #s(literal -1/48 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* -1/2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1)))
(sin (* 1/2 lambda1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))
(+ (sin (* 1/2 lambda1)) (* -1/2 (* lambda2 (cos (* 1/2 lambda1)))))
(fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (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 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal -1/8 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.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 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (*.f64 #s(literal 1/48 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- lambda1 lambda2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin (* 1/2 (+ lambda1 (* -1 lambda2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(- 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* phi1 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(-.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (neg.f64 phi1) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(- (+ 1 (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(fma.f64 phi1 (fma.f64 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (neg.f64 phi1) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(- (+ 1 (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/8 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))) (* -1/24 (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2)))))))) (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (neg (* 1/2 phi2))) 2)) (* 1/4 (pow (cos (neg (* 1/2 phi2))) 2)))))) (* (cos (neg (* 1/2 phi2))) (sin (neg (* 1/2 phi2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (neg (* 1/2 phi2))) 2)))
(fma.f64 phi1 (fma.f64 phi1 (neg.f64 (fma.f64 phi1 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64)) (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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)))
(-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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))))
(- (+ 1 (* phi2 (- (* -1 (* phi2 (+ (* -1/2 (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* 1/2 phi1)) 2)) (* 1/4 (pow (cos (* 1/2 phi1)) 2)))))) (* -1 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))))) (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(-.f64 (fma.f64 phi2 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (neg.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64)) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.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 (- (* 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 phi2 (fma.f64 phi2 (neg.f64 (fma.f64 phi2 (*.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)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* -1/2 phi2)) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2)))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 (fma.f64 lambda1 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 (fma.f64 lambda1 (neg.f64 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))))) (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda1 (fma.f64 lambda1 (neg.f64 (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- (+ 1 (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(- (+ 1 (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))))) (* -1 (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 (fma.f64 lambda2 (fma.f64 lambda2 (neg.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (neg (* 1/2 phi2))) (sin (* 1/2 phi1))) (* (cos (* 1/2 phi1)) (sin (neg (* 1/2 phi2))))) 2)))
(-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* 1/2 phi1)) 2)))
(sqrt.f64 (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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 phi2 (*.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 phi2 (+.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (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 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/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 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 phi2 (fma.f64 phi2 (*.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 (+.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (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 phi2 (fma.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) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (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 (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 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* 1/2 (* (* phi1 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))
(fma.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (fma.f64 phi1 (+.f64 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))) (* phi1 (+ (* 1/2 (* (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (* 1/2 (* (* phi1 (- (+ (* -1/8 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2)))) (* -1/24 (* (cos (* 1/2 phi2)) (sin (* -1/2 phi2))))) (* 1/2 (/ (* (cos (* 1/2 phi2)) (* (sin (* -1/2 phi2)) (- (+ (* -1/2 (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (+ (* -1/4 (pow (sin (* -1/2 phi2)) 2)) (* 1/4 (pow (cos (* 1/2 phi2)) 2)))) (* 1/4 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (sin (* -1/2 phi2)) 2)) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2))))))) (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))) (sqrt (/ 1 (+ (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2)) (pow (sin (* -1/2 phi2)) 2)))))))))))
(fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (+.f64 (+.f64 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (*.f64 phi1 (fma.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (fma.f64 (*.f64 (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) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 1/2 (* (* lambda1 (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(fma.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (fma.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* lambda1 (+ (* 1/2 (* (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda1 (- (* (cos phi1) (* (cos phi2) (+ (* -1/8 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2)))) (* -1/24 (* (cos (* -1/2 lambda2)) (sin (* -1/2 lambda2))))))) (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* -1/2 lambda2)) (* (sin (* -1/2 lambda2)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* -1/2 lambda2)) 2)) (* 1/4 (pow (cos (* -1/2 lambda2)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* -1/2 lambda2)) 2) (pow (sin (* -1/2 lambda2)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 lambda2)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 lambda1 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) #s(literal -1/6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) #s(literal -1/4 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* -1/2 (+ lambda2 (* -1 lambda1)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* -1/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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))
(fma.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))) (* 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 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))) (* 1/2 (* (* lambda2 (- (* (cos phi1) (* (cos phi2) (+ (* 1/24 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1)))) (* 1/8 (* (cos (* 1/2 lambda1)) (sin (* 1/2 lambda1))))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (* 1/2 lambda1)) (* (sin (* 1/2 lambda1)) (- (* (cos phi1) (* (cos phi2) (+ (* -1/4 (pow (sin (* 1/2 lambda1)) 2)) (* 1/4 (pow (cos (* 1/2 lambda1)) 2))))) (* 1/4 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (pow (cos (* 1/2 lambda1)) 2) (pow (sin (* 1/2 lambda1)) 2)))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2))))))))) (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))) (sqrt (/ 1 (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 lambda1)) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))))))))))
(fma.f64 lambda2 (fma.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) (*.f64 lambda2 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #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) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))) (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (- lambda1 lambda2))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(sqrt (+ (* (cos phi1) (* (cos phi2) (pow (sin (* 1/2 (+ lambda1 (* -1 lambda2)))) 2))) (pow (+ (* (cos (* 1/2 phi1)) (sin (* -1/2 phi2))) (* (cos (* 1/2 phi2)) (sin (* 1/2 phi1)))) 2)))
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (cos.f64 phi1) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(- 1/2 (* 1/2 (cos (neg lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))
(- (+ 1/2 (* 1/2 (* lambda1 (sin (neg lambda2))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 lambda1 (sin.f64 lambda2))) (cos.f64 lambda2)) #s(literal 1/2 binary64))
(- (+ 1/2 (* lambda1 (- (* 1/4 (* lambda1 (cos (neg lambda2)))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(- (+ 1/2 (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (sin (neg lambda2)))) (* -1/4 (cos (neg lambda2))))) (* -1/2 (sin (neg lambda2)))))) (* 1/2 (cos (neg lambda2))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda1) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(- (+ 1/2 (* -1/2 (* lambda2 (sin lambda1)))) (* 1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))
(- (+ 1/2 (* lambda2 (- (* 1/4 (* lambda2 (cos lambda1))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(- (+ 1/2 (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (sin lambda1))) (* -1/4 (cos lambda1)))) (* 1/2 (sin lambda1))))) (* 1/2 (cos lambda1)))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal 1/12 binary64) (*.f64 lambda2 (sin.f64 lambda1)) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- (+ 1/2 (* 1/2 (cos (neg phi2)))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (* -1/4 (cos (neg phi2))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 phi2)) (*.f64 phi1 (fma.f64 (cos.f64 phi2) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2))))) (* -1/2 (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 phi2)) (*.f64 phi1 (fma.f64 (cos.f64 phi2) #s(literal -1/4 binary64) (fma.f64 #s(literal 1/12 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (* -1 (+ phi2 (* -1 phi1)))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos phi1))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (* -1/4 (cos phi1)) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (- (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1)))) (* -1/2 (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))))))) (* (cos phi1) (- 1/2 (* 1/2 (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (fma.f64 #s(literal -1/12 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (+ phi1 (* -1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/2 (cos (- phi1 phi2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* -1/4 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (neg.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda1 (- (* lambda1 (- (* 1/12 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))) (* 1/2 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (neg lambda2)))))))
(-.f64 (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal 1/12 binary64) (*.f64 lambda1 (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (neg.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* -1 (+ lambda2 (* -1 lambda1)))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* 1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* -1/4 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))
(- (+ 1/2 (+ (* 1/2 (cos (- phi1 phi2))) (* lambda2 (- (* lambda2 (- (* -1/12 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 1/4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* -1/2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos lambda1))))))
(-.f64 (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (- lambda1 lambda2)))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(- (+ 1/2 (* 1/2 (cos (- phi1 phi2)))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (+ lambda1 (* -1 lambda2))))))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/4 (pow lambda1 2))
(*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ 1/4 (* -1/48 (pow lambda1 2))))
(*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))
(* (pow lambda1 2) (+ 1/4 (* (pow lambda1 2) (- (* 1/1440 (pow lambda1 2)) 1/48))))
(*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))
(* (pow lambda1 2) (+ 1/4 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/1440 (* -1/80640 (pow lambda1 2)))) 1/48))))
(*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/80640 binary64) #s(literal 1/1440 binary64)) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(cos (neg phi2))
(cos.f64 phi2)
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (cos.f64 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg phi2))
(cos.f64 phi2)
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (cos.f64 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (sin.f64 lambda2)) (cos.f64 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg phi2))
(cos.f64 phi2)
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2)) (cos.f64 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos (* -1 (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi1 phi2))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi1 phi2))
(sin (* -1/2 phi2))
(sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))
(+ (sin (* -1/2 phi2)) (* 1/2 (* phi1 (cos (* -1/2 phi2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* -1/8 (* phi1 (sin (* -1/2 phi2)))) (* 1/2 (cos (* -1/2 phi2))))))
(fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(+ (sin (* -1/2 phi2)) (* phi1 (+ (* 1/2 (cos (* -1/2 phi2))) (* phi1 (+ (* -1/8 (sin (* -1/2 phi2))) (* -1/48 (* phi1 (cos (* -1/2 phi2)))))))))
(fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/48 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* -1/2 (+ phi2 (* -1 phi1))))
(sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (sin (* 1/2 phi1)) (* -1/2 (* phi2 (cos (* 1/2 phi1)))))
(fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (sin (* 1/2 phi1)) (* phi2 (+ (* -1/2 (cos (* 1/2 phi1))) (* -1/8 (* phi2 (sin (* 1/2 phi1)))))))
(fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (- phi1 phi2)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(sin (* 1/2 (+ phi1 (* -1 phi2))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(+ 1/2 (* -1/2 (cos (neg lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* 1/2 (* lambda1 (sin (neg lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 lambda1 (sin.f64 lambda2))) (cos.f64 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/4 (* lambda1 (cos (neg lambda2)))) (* 1/2 (sin (neg lambda2)))))))
(fma.f64 lambda1 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos (neg lambda2))) (* lambda1 (+ (* 1/2 (sin (neg lambda2))) (* lambda1 (+ (* -1/12 (* lambda1 (sin (neg lambda2)))) (* 1/4 (cos (neg lambda2)))))))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda1) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* -1 (+ lambda2 (* -1 lambda1))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos lambda1)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/4 (* lambda2 (cos lambda1)))))))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* lambda2 (+ (* 1/12 (* lambda2 (sin lambda1))) (* 1/4 (cos lambda1))))))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal 1/12 binary64) (*.f64 lambda2 (sin.f64 lambda1)) (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (sin.f64 lambda2)) (cos.f64 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (* -1 (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))

rewrite369.0ms (0.7%)

Memory
35.5MiB live, 777.1MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
4 190×lower-*.f32
4 138×lower-fma.f32
4 136×lower-*.f64
4 124×lower-fma.f64
1 902×lower-pow.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0123581
0213553
1733371
24994371
08135358
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
29 → 899
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))))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))
#s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
Outputs
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(+.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))
(-.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))
(fma.f64 lambda1 #s(literal 1/2 binary64) (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))
(fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))
(neg.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64)))
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal -2 binary64))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 2 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 2 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) lambda2)) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) #s(literal 1/8 binary64)) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (*.f64 lambda1 #s(literal 1/2 binary64))) (*.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))) (fma.f64 lambda1 #s(literal 1/2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 lambda1 lambda2))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (*.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (+.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))) R)
(*.f64 (*.f64 #s(literal 2 binary64) R) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))))
(*.f64 (*.f64 R (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))
(+.f64 phi1 (neg.f64 phi2))
(+.f64 (neg.f64 phi2) phi1)
(+.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))
(+.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(-.f64 phi1 phi2)
(-.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))
(fma.f64 #s(literal -1 binary64) phi2 phi1)
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 phi2) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (neg.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) (neg.f64 (+.f64 phi1 phi2)))
(/.f64 (fma.f64 phi1 (*.f64 phi1 phi1) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (fma.f64 phi1 phi1 (-.f64 (*.f64 (neg.f64 phi2) (neg.f64 phi2)) (*.f64 phi1 (neg.f64 phi2)))))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 phi1 phi2))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) #s(literal 1 binary64)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1 binary64)) (+.f64 phi1 phi2))
(/.f64 (*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(pow.f64 (/.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 phi1 phi2) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(*.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)) #s(literal 2 binary64))
(*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(*.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 0 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64)))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))
(pow.f64 (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(exp.f64 (log.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(fma.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)))
(/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (neg.f64 lambda2))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 (*.f64 #s(literal 1 binary64) lambda1) (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))
(+.f64 (*.f64 lambda1 #s(literal 1 binary64)) (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 lambda1 lambda2))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(pow.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(exp.f64 (log.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))))
(+.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64))))
(fma.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 1/2 binary64))
(fma.f64 #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal 1/2 binary64))))
(+.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64)))
(+.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))
(-.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))
(-.f64 (fma.f64 phi1 #s(literal 1/2 binary64) #s(literal 0 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))
(fma.f64 phi2 #s(literal -1/2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) phi2 (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 phi2 #s(literal -1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 phi2) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) #s(literal -1 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 phi2) #s(literal 1/2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal -2 binary64))
(/.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))
(/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))
(/.f64 (-.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal -1/8 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal -1/8 binary64))) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 #s(literal 1/8 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (fma.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(/.f64 (-.f64 (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 phi1 phi2))
(/.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (+.f64 phi1 phi2))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)) #s(literal 1 binary64))
(*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))
(+.f64 lambda1 (neg.f64 lambda2))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 (*.f64 #s(literal 1 binary64) lambda1) (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))
(+.f64 (*.f64 lambda1 #s(literal 1 binary64)) (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) lambda1 (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (fma.f64 lambda1 (*.f64 lambda1 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 lambda1 lambda2))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(pow.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(+.f64 phi1 (neg.f64 phi2))
(+.f64 (neg.f64 phi2) phi1)
(+.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))
(+.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(-.f64 phi1 phi2)
(-.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))
(fma.f64 #s(literal -1 binary64) phi2 phi1)
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 phi2) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (neg.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(/.f64 (neg.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) (neg.f64 (+.f64 phi1 phi2)))
(/.f64 (fma.f64 phi1 (*.f64 phi1 phi1) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (fma.f64 phi1 phi1 (-.f64 (*.f64 (neg.f64 phi2) (neg.f64 phi2)) (*.f64 phi1 (neg.f64 phi2)))))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 phi1 phi2))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) #s(literal 1 binary64)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1 binary64)) (+.f64 phi1 phi2))
(/.f64 (*.f64 (neg.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal -2 binary64))
(pow.f64 (/.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 phi1 phi2) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(*.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))
(*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)) #s(literal 2 binary64))
(*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))
(*.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))) (*.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (+.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(pow.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))
(fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 lambda2)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal -2 binary64))))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(+.f64 #s(literal 1 binary64) (neg.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))
(+.f64 (neg.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (/.f64 (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (fma.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))
(fma.f64 #s(literal -1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (neg.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (neg.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (neg.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (fma.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))
(exp.f64 (*.f64 (log.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))))
(pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))
#s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) #s(literal 1/2 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 lambda1) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (cos.f64 lambda1) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/4 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/4 binary64))))))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) (cos.f64 (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) (sin.f64 (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 phi1 phi2)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 phi1 phi2)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (neg.f64 (cos.f64 (+.f64 phi1 phi2))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi2))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
#s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (fma.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (neg.f64 phi2)) (sin.f64 phi1)))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1 binary64) (neg.f64 phi2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) (cos.f64 (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) (sin.f64 (*.f64 (neg.f64 phi2) #s(literal 1 binary64)))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 phi1 phi2)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 phi1 phi2)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (neg.f64 (cos.f64 (+.f64 phi1 phi2))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi2))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (fma.f64 phi1 #s(literal 1/2 binary64) #s(literal 0 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (fma.f64 phi1 #s(literal 1/2 binary64) #s(literal 0 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(neg.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))
(/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/.f64 (fma.f64 (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 1 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 phi2) phi1)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(exp.f64 (log.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (fma.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1 binary64) (neg.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1 binary64))) (cos.f64 (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1 binary64))) (sin.f64 (*.f64 (neg.f64 lambda2) #s(literal 1 binary64)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))

eval884.0ms (1.6%)

Memory
26.0MiB live, 1 318.8MiB allocated
Compiler

Compiled 262 000 to 13 740 computations (94.8% saved)

prune2.3s (4%)

Memory
-27.2MiB live, 3 274.2MiB allocated
Pruning

247 alts after pruning (247 fresh and 0 done)

PrunedKeptTotal
New3 004933 097
Fresh73154227
Picked505
Done000
Total3 0822473 329
Accuracy
83.0%
Counts
3 329 → 247
Alt Table
Click to see full alt table
StatusAccuracyProgram
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
47.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
45.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
21.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
21.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
59.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
41.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
22.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
19.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
26.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
61.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
44.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
46.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
11.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
16.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
28.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
34.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
27.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
30.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
28.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
24.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
23.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
27.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
30.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
30.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
59.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
37.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
43.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
46.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
46.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
54.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
60.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
39.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
23.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
46.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
41.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
54.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
37.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
36.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
38.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
44.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
60.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
45.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
48.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
45.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
38.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
46.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
45.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
45.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
44.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
22.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
34.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
37.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
34.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
41.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
39.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
17.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
41.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
31.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
36.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
36.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
25.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
42.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
27.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
41.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
34.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
41.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
41.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
46.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
45.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
47.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
30.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
36.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
34.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
26.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
32.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
34.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
18.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
34.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
32.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
18.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
18.4%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
31.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
29.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
31.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
43.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
24.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
26.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
28.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
34.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.0%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
25.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
28.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
25.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
32.9%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
13.8%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
23.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
29.2%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
27.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
20.7%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
18.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
19.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
29.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
33.1%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
22.6%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
20.5%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
22.3%
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
43.4%
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
60.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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))))))))))
41.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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))))))))))
61.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
76.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
78.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
78.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
63.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
79.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
64.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
49.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))
64.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
50.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (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)))))))))
42.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))))))))
49.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
42.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
80.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
52.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 #s(approx (sin (* 1/2 (- lambda1 lambda2))) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
61.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 #s(approx (sin (* 1/2 (- lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
71.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
21.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
58.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
55.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
78.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
80.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
60.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
64.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
64.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
80.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
54.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
60.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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))))))))))
63.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
63.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
64.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
48.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
40.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
40.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
42.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
50.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
22.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
62.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
40.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
62.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
50.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
52.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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)))))))))
47.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
48.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
18.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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
46.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
49.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 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.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 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
63.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 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) (/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))))))
63.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
19.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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
52.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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)))))))))
52.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
55.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
50.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
49.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
51.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 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
48.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))))) (-.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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
49.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
46.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 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #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))))))))))
55.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)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
55.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
57.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
37.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
16.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
53.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
44.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
44.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
44.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
45.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
26.2%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
14.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
36.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
33.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
30.1%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
44.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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)))))))))
33.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
42.6%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
13.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
35.3%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
48.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
48.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
43.7%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
59.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
56.4%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
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 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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))))))))))
38.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
47.0%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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))))))))))
49.8%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
43.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
25.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
35.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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #s(approx (/ (- lambda1 lambda2) 2) (*.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
13.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #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)))))))))
33.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
35.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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
38.5%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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))))))))))
39.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
39.9%
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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)))))))))
32.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 (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
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 (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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.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))))) (fma.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 55 948 to 13 625 computations (75.6% saved)

regimes2.6s (4.6%)

Memory
-109.7MiB live, 2 927.2MiB allocated
Counts
469 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 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 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) 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)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 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 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 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) 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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (*.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))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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 (+.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #s(approx (/ (- lambda1 lambda2) 2) (*.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 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (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))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.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)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 #s(approx (sin (* 1/2 (- lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (fma.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 #s(approx (sin (* 1/2 (- lambda1 lambda2))) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 phi2 (fma.f64 (fma.f64 #s(literal 1/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (neg.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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal 1/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (cos.f64 phi2) (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 (fma.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) (*.f64 (cos.f64 phi2) (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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (-.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (*.f64 phi1 #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.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 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))))) (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 lambda2 (fma.f64 lambda2 (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1/6 binary64))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 #s(approx (sqrt (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (fma.f64 phi1 (fma.f64 (*.f64 #s(literal -1/4 binary64) (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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (cos.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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64))))) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))))) (sqrt.f64 (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 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))))) (fma.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 phi2 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
Calls

12 calls:

573.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))))))))))
298.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)))))
207.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
192.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
181.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
80.9%1R
80.9%1lambda1
80.9%1lambda2
80.9%1phi1
80.9%1phi2
80.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))))))))))
80.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)))))))))
80.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))))))))
80.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)))))
80.9%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
80.9%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
80.9%1(-.f64 lambda1 lambda2)
Compiler

Compiled 296 to 142 computations (52% saved)

regimes1.9s (3.4%)

Memory
-5.1MiB live, 2 266.8MiB allocated
Counts
445 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 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 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) 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)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 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 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 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) 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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (*.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))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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 (+.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #s(approx (/ (- lambda1 lambda2) 2) (*.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 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (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))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.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)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 #s(approx (sin (* 1/2 (- lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (fma.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2))))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 #s(approx (sin (* 1/2 (- lambda1 lambda2))) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 lambda2 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 1 binary64)) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64)) #s(literal 1 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (fma.f64 phi2 (fma.f64 (fma.f64 #s(literal 1/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (neg.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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal 1/4 binary64) (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 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda1 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2)))))) (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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
Calls

12 calls:

206.0ms
phi2
205.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))))))))
194.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)))))
158.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))))))))))
144.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
80.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)))))))))
80.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))))))))
80.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)))))
80.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))))))))))
80.3%1R
80.3%1phi2
80.3%1phi1
80.3%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
80.3%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
80.3%1(-.f64 lambda1 lambda2)
80.3%1lambda2
80.3%1lambda1
Compiler

Compiled 296 to 142 computations (52% saved)

regimes1.9s (3.3%)

Memory
41.0MiB live, 1 663.4MiB allocated
Counts
397 → 2
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 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 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) 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)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 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 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 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) 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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (*.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))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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 (+.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #s(approx (/ (- lambda1 lambda2) 2) (*.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 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (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))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 6 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.f64 phi2)))) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 (neg.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)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
Calls

12 calls:

197.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
177.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)))))
168.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)))))))))
159.0ms
phi1
153.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
78.4%1R
78.4%1lambda2
78.4%1(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
80.2%2(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
80.2%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))))))))
78.4%1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
78.4%1phi1
78.4%1lambda1
78.4%1phi2
78.4%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
78.4%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
78.4%1(-.f64 lambda1 lambda2)
Compiler

Compiled 296 to 142 computations (52% saved)

regimes263.0ms (0.5%)

Memory
-27.1MiB live, 377.5MiB allocated
Counts
382 → 2
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 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 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) 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)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 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 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 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) 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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (*.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))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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 (+.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #s(approx (/ (- lambda1 lambda2) 2) (*.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 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (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))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
Calls

2 calls:

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

Compiled 134 to 49 computations (63.4% saved)

regimes251.0ms (0.4%)

Memory
34.4MiB live, 460.4MiB allocated
Counts
381 → 2
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 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 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) 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)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 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 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 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) 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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (*.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))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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 (+.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #s(approx (/ (- lambda1 lambda2) 2) (*.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 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (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))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
Calls

2 calls:

104.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))))))))
103.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
80.1%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)))))))))
80.1%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))))))))
Compiler

Compiled 134 to 49 computations (63.4% saved)

regimes1.4s (2.4%)

Memory
16.2MiB live, 1 790.7MiB allocated
Counts
380 → 2
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 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 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) 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)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 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 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 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) 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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (*.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))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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 (+.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))) #s(literal 1 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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.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 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 #s(approx (/ (- lambda1 lambda2) 2) (*.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 phi1 (*.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda1)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 (*.f64 lambda2 (sin.f64 lambda1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/8 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal -1/2 binary64) (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))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))) #s(literal 2 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
Calls

12 calls:

127.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
121.0ms
(-.f64 lambda1 lambda2)
114.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)))))
112.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))))))))))
108.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
Results
AccuracySegmentsBranch
76.7%1lambda2
76.7%1(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
76.7%1R
80.2%3phi1
79.6%2(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
80.4%3phi2
76.7%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
76.7%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
76.7%1(-.f64 lambda1 lambda2)
76.7%1lambda1
79.9%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)))))))))
79.9%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))))))))
Compiler

Compiled 296 to 142 computations (52% saved)

regimes1.5s (2.8%)

Memory
29.0MiB live, 1 900.4MiB allocated
Counts
353 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 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 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) 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)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 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 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (cos.f64 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) phi1) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(approx (sin (/ (- lambda1 lambda2) 2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/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 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) 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 #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 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #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 (*.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))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (fma.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1)) (-.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi1 phi2) (*.f64 phi1 phi1))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 (fma.f64 (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 4 binary64))) #s(literal 1 binary64)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (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 (+.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (- (* (sin (* lambda1 1/2)) (cos (* lambda2 1/2))) (* (cos (* lambda1 1/2)) (sin (* lambda2 1/2))))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2))))) (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 (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal -1 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #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 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))) (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)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 lambda2 #s(literal -1/8 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #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 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (fma.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (+ (* (sin (* phi2 -1/2)) (cos (* phi1 1/2))) (* (sin (* phi1 1/2)) (cos (* phi2 1/2)))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 #s(approx (sin (/ (- phi1 phi2) 2)) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (sin.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(approx (cos (* (- lambda1 lambda2) 1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.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)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* (cos (* (- lambda1 lambda2) 1)) -1/2) 1/2) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (cos.f64 lambda1))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (neg.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 4 binary64)) (neg.f64 (pow.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 1 binary64))))))) (*.f64 (*.f64 (+.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) #s(literal 0 binary64)) #s(literal 1/2 binary64)) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #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)))) (-.f64 (fma.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 (neg.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) (sin.f64 (*.f64 (neg.f64 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 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (-.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
Calls

12 calls:

295.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))))))))
126.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)))))
113.0ms
phi2
112.0ms
phi1
108.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
64.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))))))))))
64.3%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
64.3%1(-.f64 lambda1 lambda2)
64.3%1R
64.3%1lambda1
64.3%1lambda2
64.3%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
64.3%1phi1
64.3%1phi2
64.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)))))
64.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)))))))))
64.3%1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
Compiler

Compiled 296 to 142 computations (52% saved)

regimes1.1s (2%)

Memory
-7.2MiB live, 1 446.4MiB allocated
Counts
237 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 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 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (sin.f64 (*.f64 phi2 #s(literal -2 binary64))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #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) lambda1)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #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 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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) lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 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 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 lambda2 #s(literal -1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (pow.f64 (pow.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))) #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 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) lambda2)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal -1/2 binary64) phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal -1/2 binary64) 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)))) (sin.f64 #s(approx (/ (- lambda1 lambda2) 2) (*.f64 #s(literal 1/2 binary64) lambda1))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 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 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 phi1 (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 lambda1 (/.f64 #s(literal 2 binary64) lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) #s(literal 2 binary64)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) lambda2)) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) lambda1) (/.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1))) (fma.f64 phi2 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 phi2 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))))) (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 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi1 (*.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (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) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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))))))))))
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 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
Calls

12 calls:

171.0ms
R
103.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))))))))))
98.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))))))))
92.0ms
phi2
85.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
63.8%1phi1
63.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)))))))))
63.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))))))))
63.8%1phi2
63.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)))))
63.8%1lambda2
63.8%1R
63.8%1lambda1
63.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))))))))))
63.8%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
63.8%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
63.8%1(-.f64 lambda1 lambda2)
Compiler

Compiled 296 to 142 computations (52% saved)

regimes732.0ms (1.3%)

Memory
-13.1MiB live, 1 141.9MiB allocated
Counts
180 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 #s(approx (+ (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))))) (- 1/2 (* 1/2 (+ (* (cos phi2) (cos phi1)) (* (sin phi1) (sin phi2)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (cos.f64 (+.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
Calls

12 calls:

87.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
86.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))))))))
66.0ms
lambda1
59.0ms
R
56.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
63.4%1phi1
63.4%1lambda2
63.4%1phi2
63.4%1R
63.4%1(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.4%1(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
63.4%1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
63.4%1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
63.4%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
63.4%1(-.f64 lambda1 lambda2)
63.4%1lambda1
63.4%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
Compiler

Compiled 296 to 142 computations (52% saved)

regimes754.0ms (1.3%)

Memory
18.4MiB live, 1 101.2MiB allocated
Counts
173 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) #s(approx (* 1/4 (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1)))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal -2 binary64)))) #s(literal 1/8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 #s(approx (cos (* (- phi1 phi2) 1)) (cos.f64 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (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 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 #s(approx (* (- phi1 phi2) 1) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.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 #s(approx (- 1 (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 lambda2 lambda1))) #s(literal 2 binary64)) (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(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 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 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 lambda2 lambda1))) #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 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) #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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (+ (* (sin (* lambda2 -1/2)) (cos (* (neg lambda1) -1/2))) (* (cos (* lambda2 -1/2)) (sin (* (neg lambda1) -1/2)))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1)) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (fma.f64 phi2 (+.f64 phi2 phi1) (*.f64 phi1 phi1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
Calls

12 calls:

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

Compiled 296 to 142 computations (52% saved)

regimes567.0ms (1%)

Memory
-3.4MiB live, 947.3MiB allocated
Counts
146 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/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) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
Calls

12 calls:

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

Compiled 296 to 142 computations (52% saved)

regimes1.2s (2.1%)

Memory
0.1MiB live, 759.8MiB allocated
Counts
142 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
Calls

12 calls:

199.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))))))))
181.0ms
phi2
133.0ms
phi1
130.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))))))))))
109.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
63.4%1phi1
63.4%1phi2
63.4%1(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
63.4%1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
63.4%1lambda2
63.4%1(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.4%1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
63.4%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
63.4%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
63.4%1(-.f64 lambda1 lambda2)
63.4%1lambda1
63.4%1R
Compiler

Compiled 296 to 142 computations (52% saved)

regimes1.2s (2.1%)

Memory
7.1MiB live, 808.7MiB allocated
Counts
141 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) #s(approx (/ (- phi1 phi2) 2) (*.f64 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 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (sin.f64 phi1)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (sin.f64 lambda1)) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
Calls

12 calls:

206.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
141.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))))))))))
138.0ms
(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
115.0ms
lambda1
111.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
63.4%1lambda2
63.4%1phi1
63.4%1phi2
63.4%1(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
63.4%1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
63.4%1(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
63.4%1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
63.4%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
63.4%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
63.4%1(-.f64 lambda1 lambda2)
63.4%1R
63.4%1lambda1
Compiler

Compiled 296 to 142 computations (52% saved)

regimes480.0ms (0.9%)

Memory
17.4MiB live, 913.7MiB allocated
Counts
132 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 #s(approx (/ (- phi1 phi2) 2) (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 (cos.f64 phi1) #s(literal -1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

43.0ms
phi1
42.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))))))))))
40.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
40.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))))))))
39.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
62.2%1phi1
62.2%1phi2
62.2%1(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
62.2%1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
62.2%1lambda2
62.2%1(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.2%1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
62.2%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
62.2%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
62.2%1(-.f64 lambda1 lambda2)
62.2%1R
62.2%1lambda1
Compiler

Compiled 296 to 142 computations (52% saved)

regimes410.0ms (0.7%)

Memory
11.3MiB live, 714.0MiB allocated
Counts
112 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

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

Compiled 296 to 142 computations (52% saved)

regimes425.0ms (0.8%)

Memory
-12.1MiB live, 671.9MiB allocated
Counts
111 → 2
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 lambda1 (/.f64 lambda2 (neg.f64 lambda1)) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- phi1 phi2) 1/2)) (fma.f64 phi1 (/.f64 phi2 (neg.f64 phi1)) phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1))) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 (neg.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

61.0ms
phi2
35.0ms
lambda1
34.0ms
lambda2
33.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
33.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
60.7%1phi2
60.7%1lambda2
60.7%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
60.7%1(-.f64 lambda1 lambda2)
60.7%1phi1
60.7%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
62.6%2(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
62.6%2(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
60.7%1R
60.7%1lambda1
60.7%1(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
62.9%2(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
Compiler

Compiled 296 to 142 computations (52% saved)

regimes111.0ms (0.2%)

Memory
12.0MiB live, 125.2MiB allocated
Counts
86 → 2
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1)))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
Calls

3 calls:

48.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)))))
28.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))))))))
24.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
62.2%2(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
62.2%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))))))))
62.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)))))
Compiler

Compiled 167 to 68 computations (59.3% saved)

regimes43.0ms (0.1%)

Memory
-13.4MiB live, 55.3MiB allocated
Counts
84 → 2
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- lambda1 lambda2) 1/2))) (cos.f64 lambda2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
Calls

1 calls:

34.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
62.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)))))
Compiler

Compiled 33 to 19 computations (42.4% saved)

regimes31.0ms (0.1%)

Memory
-1.3MiB live, 75.0MiB allocated
Counts
76 → 2
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (cos.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2)) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2) (sin.f64 phi1)) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi1) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (cos.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
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 (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
Calls

1 calls:

21.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
62.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)))))
Compiler

Compiled 33 to 19 computations (42.4% saved)

regimes240.0ms (0.4%)

Memory
22.4MiB live, 373.2MiB allocated
Counts
63 → 2
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) phi1) (sin.f64 phi2)) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

28.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
22.0ms
phi1
20.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))))))))
19.0ms
lambda1
19.0ms
R
Results
AccuracySegmentsBranch
62.2%2(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
62.2%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))))))))
60.3%1phi2
60.3%1R
60.3%1lambda2
60.3%1phi1
60.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))))))))))
60.3%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
60.3%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
60.3%1(-.f64 lambda1 lambda2)
60.3%1lambda1
62.2%2(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
Compiler

Compiled 296 to 142 computations (52% saved)

regimes214.0ms (0.4%)

Memory
-7.0MiB live, 351.5MiB allocated
Counts
58 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi2 phi1))))))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

21.0ms
(-.f64 lambda1 lambda2)
19.0ms
lambda2
17.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))))))))))
17.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)))))))))
17.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
47.2%1lambda2
62.7%3phi2
60.7%3phi1
49.0%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))))))))))
48.8%2(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
48.8%2(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
48.8%2(-.f64 lambda1 lambda2)
49.1%2R
49.7%2lambda1
50.3%2(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
50.3%2(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))
50.3%2(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
Compiler

Compiled 296 to 142 computations (52% saved)

regimes17.0ms (0%)

Memory
-7.5MiB live, 29.7MiB allocated
Counts
38 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 #s(approx (* 2 (* (- lambda1 lambda2) 1/2)) (fma.f64 (/.f64 lambda2 lambda1) (neg.f64 lambda1) lambda1)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (+.f64 phi2 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 (neg.f64 phi2) (neg.f64 phi2))) (-.f64 phi1 (neg.f64 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda1 lambda2) (*.f64 lambda1 lambda1))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi1 (sin.f64 phi2) (cos.f64 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (fma.f64 phi2 (sin.f64 phi1) (cos.f64 phi1))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
Calls

1 calls:

13.0ms
phi2
Results
AccuracySegmentsBranch
60.8%3phi2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes18.0ms (0%)

Memory
0.2MiB live, 37.3MiB allocated
Counts
21 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) #s(approx (+ 1/2 (* -1/2 (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (/.f64 (*.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 phi1 phi2))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
Calls

2 calls:

9.0ms
phi1
6.0ms
phi2
Results
AccuracySegmentsBranch
51.8%3phi1
56.3%3phi2
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes8.0ms (0%)

Memory
17.0MiB live, 17.0MiB allocated
Counts
17 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) #s(approx (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
Calls

1 calls:

5.0ms
phi2
Results
AccuracySegmentsBranch
56.3%3phi2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes67.0ms (0.1%)

Memory
2.7MiB live, 162.3MiB allocated
Counts
13 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

8.0ms
(*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))))
7.0ms
phi2
6.0ms
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))))))
5.0ms
(-.f64 lambda1 lambda2)
5.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
47.4%3lambda2
39.8%3(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
39.8%3(-.f64 lambda1 lambda2)
36.2%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
36.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))))))))))
36.2%1R
46.0%3lambda1
46.8%3phi1
37.8%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)))))))))
37.8%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))))))))
37.7%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)))))
47.5%3phi2
Compiler

Compiled 296 to 142 computations (52% saved)

regimes23.0ms (0%)

Memory
-33.6MiB live, 46.8MiB allocated
Counts
12 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
Calls

4 calls:

7.0ms
lambda1
6.0ms
phi2
4.0ms
lambda2
4.0ms
phi1
Results
AccuracySegmentsBranch
36.4%2lambda1
44.4%3phi1
34.5%1lambda2
44.3%3phi2
Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes76.0ms (0.1%)

Memory
17.8MiB live, 94.6MiB allocated
Counts
10 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

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

Compiled 296 to 142 computations (52% saved)

regimes86.0ms (0.2%)

Memory
-16.3MiB live, 69.3MiB allocated
Counts
9 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda2) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

29.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))))))))))
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)))))
4.0ms
R
Results
AccuracySegmentsBranch
32.9%1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
32.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))))))))))
32.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)))))
32.9%1(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
32.9%1(-.f64 lambda1 lambda2)
32.9%1R
32.9%1lambda2
32.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)))))))))
32.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))))))))
32.9%1phi2
32.9%1phi1
32.9%1lambda1
Compiler

Compiled 296 to 142 computations (52% saved)

regimes69.0ms (0.1%)

Memory
-2.4MiB live, 74.1MiB allocated
Counts
7 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

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

Compiled 296 to 142 computations (52% saved)

regimes7.0ms (0%)

Memory
15.1MiB live, 15.1MiB allocated
Counts
6 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Calls

2 calls:

3.0ms
phi2
3.0ms
phi1
Results
AccuracySegmentsBranch
33.2%3phi1
33.2%3phi2
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes36.0ms (0.1%)

Memory
-2.2MiB live, 77.0MiB allocated
Counts
5 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
Calls

12 calls:

5.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))))))))))
4.0ms
(/.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
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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
23.3%1lambda2
23.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))))))))))
23.3%1R
25.0%2(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
29.7%3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))
25.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)))))))))
25.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))))))))
29.6%3(/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))
29.6%3(-.f64 lambda1 lambda2)
23.3%1phi2
29.9%3lambda1
26.9%3phi1
Compiler

Compiled 296 to 142 computations (52% saved)

regimes3.0ms (0%)

Memory
7.9MiB live, 7.9MiB allocated
Counts
4 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
Calls

1 calls:

2.0ms
lambda1
Results
AccuracySegmentsBranch
29.8%3lambda1
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes3.0ms (0%)

Memory
7.0MiB live, 7.0MiB allocated
Counts
3 → 3
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
Calls

1 calls:

2.0ms
lambda1
Results
AccuracySegmentsBranch
29.7%3lambda1
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes21.0ms (0%)

Memory
-25.5MiB live, 52.6MiB allocated
Accuracy

Total -6.1b remaining (-12.4%)

Threshold costs -6.1b (-12.4%)

Counts
2 → 1
Calls
Call 1
Inputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
Calls

10 calls:

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

Compiled 284 to 132 computations (53.5% saved)

bsearch8.0ms (0%)

Memory
19.0MiB live, 19.0MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.09357078796403802
0.09404499609802434
Compiler

Compiled 73 to 35 computations (52.1% saved)

bsearch7.0ms (0%)

Memory
17.0MiB live, 17.0MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.09357078796403802
0.09404499609802434
Compiler

Compiled 73 to 35 computations (52.1% saved)

bsearch10.0ms (0%)

Memory
-19.3MiB live, 16.1MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.09357078796403802
0.09404499609802434
Compiler

Compiled 73 to 35 computations (52.1% saved)

bsearch7.0ms (0%)

Memory
19.4MiB live, 19.4MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.614169933526171e-5
6.67153981616015e-5
Compiler

Compiled 73 to 35 computations (52.1% saved)

bsearch2.0ms (0%)

Memory
4.0MiB live, 4.0MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.3466295774617102e-5
0.0015047069263244574
Compiler

Compiled 46 to 35 computations (23.9% saved)

bsearch1.0ms (0%)

Memory
3.2MiB live, 3.2MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.3466295774617102e-5
0.0015047069263244574
Compiler

Compiled 46 to 35 computations (23.9% saved)

bsearch4.0ms (0%)

Memory
-39.2MiB live, 3.4MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.3466295774617102e-5
0.0015047069263244574
Compiler

Compiled 46 to 35 computations (23.9% saved)

bsearch1.0ms (0%)

Memory
3.0MiB live, 3.0MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.3466295774617102e-5
0.0015047069263244574
Compiler

Compiled 46 to 35 computations (23.9% saved)

bsearch1.0ms (0%)

Memory
2.6MiB live, 2.6MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.0022009761303187414
0.0039206856432166095
Compiler

Compiled 46 to 35 computations (23.9% saved)

bsearch180.0ms (0.3%)

Memory
13.0MiB live, 283.0MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
98.0ms
4.564232603977555
499456419.98315066
66.0ms
-0.04175547642611738
-0.0009040388179117071
Samples
141.0ms209×1valid
10.0ms47×0valid
Compiler

Compiled 1 881 to 1 138 computations (39.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 135.0ms
ival-sin: 39.0ms (28.8% of total)
ival-cos: 35.0ms (25.9% of total)
ival-mult: 15.0ms (11.1% of total)
adjust: 10.0ms (7.4% of total)
ival-sqrt: 8.0ms (5.9% of total)
ival-atan2: 8.0ms (5.9% of total)
ival-sub: 7.0ms (5.2% of total)
ival-div: 6.0ms (4.4% of total)
ival-pow2: 5.0ms (3.7% of total)
ival-add: 2.0ms (1.5% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
3.3MiB live, 3.3MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
2.0ms
4.564232603977555
499456419.98315066
1.0ms
-0.04175547642611738
-0.0009040388179117071
Compiler

Compiled 1 881 to 1 138 computations (39.5% saved)

bsearch74.0ms (0.1%)

Memory
-13.4MiB live, 36.1MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
2.0ms
4.564232603977555
499456419.98315066
68.0ms
-0.04175547642611738
-0.0009040388179117071
Samples
61.0ms64×1valid
3.0ms16×0valid
Compiler

Compiled 1 785 to 1 090 computations (38.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 60.0ms
ival-sin: 34.0ms (57% of total)
ival-cos: 8.0ms (13.4% of total)
ival-mult: 5.0ms (8.4% of total)
adjust: 3.0ms (5% of total)
ival-sub: 2.0ms (3.4% of total)
ival-div: 2.0ms (3.4% of total)
ival-pow2: 2.0ms (3.4% of total)
ival-sqrt: 2.0ms (3.4% of total)
ival-atan2: 2.0ms (3.4% of total)
ival-add: 1.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch42.0ms (0.1%)

Memory
20.4MiB live, 58.0MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
2.0ms
4.564232603977555
499456419.98315066
37.0ms
-0.04175547642611738
-0.0009040388179117071
Samples
31.0ms47×1valid
3.0ms17×0valid
Compiler

Compiled 1 769 to 1 058 computations (40.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 30.0ms
ival-sin: 10.0ms (32.9% of total)
ival-cos: 6.0ms (19.7% of total)
ival-mult: 4.0ms (13.2% of total)
ival-sub: 2.0ms (6.6% of total)
adjust: 2.0ms (6.6% of total)
ival-sqrt: 2.0ms (6.6% of total)
ival-atan2: 2.0ms (6.6% of total)
ival-div: 1.0ms (3.3% of total)
ival-pow2: 1.0ms (3.3% 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)

bsearch23.0ms (0%)

Memory
2.6MiB live, 40.1MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
2.0ms
4.564232603977555
499456419.98315066
20.0ms
-0.04175547642611738
-0.0009040388179117071
Samples
17.0ms26×1valid
1.0ms6×0valid
Compiler

Compiled 1 753 to 1 074 computations (38.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 16.0ms
ival-sin: 4.0ms (25.1% of total)
ival-cos: 3.0ms (18.8% of total)
ival-div: 2.0ms (12.6% of total)
ival-mult: 2.0ms (12.6% of total)
ival-sub: 1.0ms (6.3% of total)
adjust: 1.0ms (6.3% of total)
ival-pow2: 1.0ms (6.3% of total)
ival-sqrt: 1.0ms (6.3% of total)
ival-atan2: 1.0ms (6.3% 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)

bsearch219.0ms (0.4%)

Memory
-2.5MiB live, 309.3MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
92.0ms
3.0867148146765444e+24
2.4869003385047627e+26
101.0ms
-170641.17490404347
-6.891070395501263e-7
Samples
173.0ms237×1valid
6.0ms35×0valid
Compiler

Compiled 1 801 to 1 092 computations (39.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 165.0ms
ival-sin: 50.0ms (30.3% of total)
ival-cos: 36.0ms (21.8% of total)
ival-sqrt: 18.0ms (10.9% of total)
ival-mult: 17.0ms (10.3% of total)
adjust: 13.0ms (7.9% of total)
ival-sub: 8.0ms (4.9% of total)
ival-atan2: 8.0ms (4.9% of total)
ival-div: 6.0ms (3.6% of total)
ival-pow2: 5.0ms (3% of total)
ival-add: 2.0ms (1.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch119.0ms (0.2%)

Memory
30.2MiB live, 217.9MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
88.0ms
0.0007056919534288036
4.564232603977555
24.0ms
-0.04175547642611738
-0.0009040388179117071
Samples
99.0ms141×1valid
3.0ms19×0valid
Compiler

Compiled 1 499 to 904 computations (39.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 93.0ms
ival-sin: 31.0ms (33.2% of total)
ival-cos: 24.0ms (25.7% of total)
ival-mult: 10.0ms (10.7% of total)
adjust: 7.0ms (7.5% of total)
ival-sub: 4.0ms (4.3% of total)
ival-sqrt: 4.0ms (4.3% of total)
ival-div: 4.0ms (4.3% of total)
ival-atan2: 4.0ms (4.3% of total)
ival-pow2: 3.0ms (3.2% of total)
ival-add: 1.0ms (1.1% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch217.0ms (0.4%)

Memory
-4.7MiB live, 351.2MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
102.0ms
4.119477690903727e-14
1.3908478685817616
98.0ms
-170641.17490404347
-6.891070395501263e-7
Samples
172.0ms228×1valid
11.0ms60×0valid
Compiler

Compiled 2 053 to 1 254 computations (38.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 168.0ms
ival-sin: 43.0ms (25.7% of total)
ival-mult: 36.0ms (21.5% of total)
ival-cos: 35.0ms (20.9% of total)
adjust: 16.0ms (9.5% of total)
ival-sub: 9.0ms (5.4% of total)
ival-sqrt: 7.0ms (4.2% of total)
ival-div: 7.0ms (4.2% of total)
ival-atan2: 7.0ms (4.2% of total)
ival-pow2: 6.0ms (3.6% of total)
ival-add: 2.0ms (1.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch560.0ms (1%)

Memory
-143.8MiB live, 400.6MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
120.0ms
0.010754870045583174
24.1739201463311
428.0ms
-5.023666662163097e-7
-1.2397134292314464e-13
Samples
197.0ms232×1valid
9.0ms40×0valid
Compiler

Compiled 1 943 to 1 173 computations (39.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 190.0ms
ival-mult: 50.0ms (26.3% of total)
ival-cos: 43.0ms (22.7% of total)
ival-sin: 40.0ms (21.1% of total)
ival-pow2: 13.0ms (6.8% of total)
adjust: 11.0ms (5.8% of total)
ival-atan2: 9.0ms (4.7% of total)
ival-sub: 8.0ms (4.2% of total)
ival-div: 7.0ms (3.7% of total)
ival-sqrt: 6.0ms (3.2% of total)
ival-add: 2.0ms (1.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch196.0ms (0.4%)

Memory
-8.8MiB live, 344.0MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
75.0ms
3.228339867052336e-5
0.007339306839774957
109.0ms
-0.0683405478389439
-5.023666662163097e-7
Samples
163.0ms218×1valid
7.0ms38×0valid
Compiler

Compiled 1 753 to 1 074 computations (38.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 155.0ms
ival-cos: 57.0ms (36.7% of total)
ival-sin: 36.0ms (23.2% of total)
ival-mult: 15.0ms (9.7% of total)
adjust: 12.0ms (7.7% of total)
ival-sub: 7.0ms (4.5% of total)
ival-div: 7.0ms (4.5% of total)
ival-sqrt: 6.0ms (3.9% of total)
ival-atan2: 6.0ms (3.9% of total)
ival-pow2: 5.0ms (3.2% of total)
ival-add: 2.0ms (1.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch48.0ms (0.1%)

Memory
2.8MiB live, 83.0MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
44.0ms
3.228339867052336e-5
0.007339306839774957
2.0ms
-5.023666662163097e-7
-1.2397134292314464e-13
Samples
38.0ms56×1valid
2.0ms8×0valid
Compiler

Compiled 1 673 to 1 042 computations (37.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-cos: 11.0ms (30.3% of total)
ival-sin: 8.0ms (22% of total)
adjust: 4.0ms (11% of total)
ival-mult: 4.0ms (11% of total)
ival-sub: 2.0ms (5.5% of total)
ival-atan2: 2.0ms (5.5% of total)
ival-div: 1.0ms (2.8% of total)
ival-pow2: 1.0ms (2.8% of total)
ival-sqrt: 1.0ms (2.8% of total)
ival-add: 1.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

simplify107.0ms (0.2%)

Memory
28.2MiB live, 104.9MiB allocated
Algorithm
1×egg-herbie
Rules
946×unsub-neg_binary64
558×neg-mul-1_binary64
350×*-commutative_binary64
298×distribute-lft-neg-in_binary64
228×distribute-rgt-neg-in_binary64
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
04916495
17276495
29296495
310916494
412406494
515846494
619946494
722886494
826216494
926236494
Stop Event
1×saturated
Calls
Call 1
Inputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) #s(literal 3386706919782613/36028797018963968 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) #s(literal 3386706919782613/36028797018963968 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) #s(literal 3386706919782613/36028797018963968 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.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 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 3458764513820541/1152921504606846976 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 phi2 #s(literal -3112888062438487/2305843009213693952 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -3112888062438487/2305843009213693952 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -6456360425798343/2305843009213693952 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -7378697629483821/4611686018427387904 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -1498797955988901/576460752303423488 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi1 #s(literal -2582544170319337/147573952589676412928 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi1 #s(literal 3199999999999999731564544 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(if (<=.f64 phi2 #s(literal -5764607523034235/4611686018427387904 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 3242591731706757/72057594037927936 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi1 #s(literal -6456360425798343/1152921504606846976 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi1 #s(literal 1080863910568919/72057594037927936 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 lambda1 #s(literal -4722366482869645/9444732965739290427392 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 lambda1 #s(literal 2116691824864133/4503599627370496 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 lambda1 #s(literal -8214565720323785/144115188075855872 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 lambda1 #s(literal 4150517416584649/576460752303423488 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 lambda1 #s(literal -4722366482869645/9444732965739290427392 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 lambda1 #s(literal 7378697629483821/2305843009213693952 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
Outputs
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 lambda2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 lambda1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 lambda2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) lambda2)))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 3386706919782613/36028797018963968 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 3386706919782613/36028797018963968 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 3386706919782613/36028797018963968 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #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 -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 3386706919782613/36028797018963968 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 3386706919782613/36028797018963968 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 3386706919782613/36028797018963968 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(approx (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (*.f64 (sin.f64 phi2) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 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 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64))))))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (cos.f64 phi2)) (pow.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))
(if (<=.f64 (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (-.f64 (-.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (*.f64 (sin.f64 phi2) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (pow.f64 (fma.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 (sin.f64 (*.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))) (sqrt.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) #s(literal 4 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))))) #s(literal 4 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.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 1/2 binary64))) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/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 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64)))))))
(*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (cos.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))))))) (*.f64 R #s(literal 2 binary64)))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))))))))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))))))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 (fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 5902958103587057/295147905179352825856 binary64)) (*.f64 R (*.f64 #s(literal 2 binary64) (atan2.f64 (sqrt.f64 #s(approx (+ (pow (sin (/ (- phi1 phi2) 2)) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) #s(approx (- (+ (* (pow (sin (* -1/2 (- lambda2 lambda1))) 2) (cos phi1)) (pow (sin (* 1/2 phi1)) 2)) (* phi2 (* (sin (* 1/2 phi1)) (cos (* 1/2 phi1))))) (pow.f64 (sin.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))))
(if (<=.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) #s(literal 3458764513820541/1152921504606846976 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R)))
(if (<=.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 3458764513820541/1152921504606846976 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) #s(approx (+ (pow (+ (* (sin (* phi1 1/2)) (cos (neg (* phi2 1/2)))) (* (cos (* phi1 1/2)) (sin (neg (* phi2 1/2))))) 2) (* (* (* (cos phi1) (cos phi2)) (sin (/ (- lambda1 lambda2) 2))) (sin (/ (- lambda1 lambda2) 2)))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64)))))))))
(if (<=.f64 phi2 #s(literal -3112888062438487/2305843009213693952 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -3112888062438487/2305843009213693952 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))))
(if (<=.f64 phi2 #s(literal -3112888062438487/2305843009213693952 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -3112888062438487/2305843009213693952 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))))
(if (<=.f64 phi2 #s(literal -6456360425798343/2305843009213693952 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -6456360425798343/2305843009213693952 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))))
(if (<=.f64 phi2 #s(literal -7378697629483821/4611686018427387904 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -7378697629483821/4611686018427387904 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))))
(if (<=.f64 phi2 #s(literal -1498797955988901/576460752303423488 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -1498797955988901/576460752303423488 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (if (<=.f64 phi2 #s(literal 2589569785738035/562949953421312 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))))
(if (<=.f64 phi1 #s(literal -2582544170319337/147573952589676412928 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi1 #s(literal 3199999999999999731564544 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi1 #s(literal -2582544170319337/147573952589676412928 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (if (<=.f64 phi1 #s(literal 3199999999999999731564544 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi1) #s(literal 1/2 binary64)))))))
(if (<=.f64 phi2 #s(literal -5764607523034235/4611686018427387904 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi2 #s(literal 3242591731706757/72057594037927936 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi2 #s(literal -5764607523034235/4611686018427387904 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))) (if (<=.f64 phi2 #s(literal 3242591731706757/72057594037927936 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi2)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))))
(if (<=.f64 phi1 #s(literal -6456360425798343/1152921504606846976 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 phi1 #s(literal 1080863910568919/72057594037927936 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 phi1 #s(literal -6456360425798343/1152921504606846976 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (if (<=.f64 phi1 #s(literal 1080863910568919/72057594037927936 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(approx (cos (* 2 (* (- phi1 phi2) 1/2))) (cos.f64 phi1)))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))))))
(if (<=.f64 lambda1 #s(literal -4722366482869645/9444732965739290427392 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 lambda1 #s(literal 2116691824864133/4503599627370496 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 lambda1 #s(literal -4722366482869645/9444732965739290427392 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))) (if (<=.f64 lambda1 #s(literal 2116691824864133/4503599627370496 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/1440 binary64) #s(literal -1/48 binary64)) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))
(if (<=.f64 lambda1 #s(literal -8214565720323785/144115188075855872 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 lambda1 #s(literal 4150517416584649/576460752303423488 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 lambda1 #s(literal -8214565720323785/144115188075855872 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))) (if (<=.f64 lambda1 #s(literal 4150517416584649/576460752303423488 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) (fma.f64 #s(literal -1/48 binary64) (*.f64 lambda1 lambda1) #s(literal 1/4 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))
(if (<=.f64 lambda1 #s(literal -4722366482869645/9444732965739290427392 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R)) (if (<=.f64 lambda1 #s(literal 7378697629483821/2305843009213693952 binary64)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (*.f64 #s(literal 2 binary64) R)) (*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))))
(if (<=.f64 lambda1 #s(literal -4722366482869645/9444732965739290427392 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))) (if (<=.f64 lambda1 #s(literal 7378697629483821/2305843009213693952 binary64)) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) #s(approx (+ (* -1/2 (cos lambda1)) 1/2) (*.f64 (*.f64 lambda1 lambda1) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 phi1 phi2) #s(literal 1/2 binary64)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 2 binary64) R))
(*.f64 (*.f64 R #s(literal 2 binary64)) (atan2.f64 (sqrt.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))))))) (sqrt.f64 #s(approx (- (+ 1/2 (* 1/2 (cos (* 2 (* (- phi1 phi2) 1/2))))) (* (cos phi1) (* (cos phi2) (- 1/2 (* 1/2 (cos (* 2 (* (- lambda1 lambda2) 1/2)))))))) #s(approx (+ 1/2 (* (cos phi1) (- 1/2 (+ 1/2 (* -1/2 (cos (- lambda1 lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))

soundness2.5s (4.4%)

Memory
-19.1MiB live, 2 423.7MiB allocated
Rules
9 414×lower-fma.f64
9 414×lower-fma.f32
9 312×lower-fma.f64
9 312×lower-fma.f32
8 668×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0123581
0213553
1733371
24994371
08135358
0118824748
1397823952
0841122889
092484
0164446
1542371
24090369
09249363
026174
045174
1149149
2997145
08852142
0114621444
1378220940
0809019633
0113510
0196520
1678327
24861325
08182317
0111520571
1378820077
0802018877
052010244
1168110020
257669998
081179552
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
1×iter limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
Compiler

Compiled 12 043 to 4 181 computations (65.3% saved)

preprocess368.0ms (0.7%)

Memory
8.2MiB live, 667.9MiB allocated
Remove

(negabs R)

Compiler

Compiled 11 276 to 2 338 computations (79.3% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...